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WAS SOLL DIESES Buch ? Eine Art Vorwort 

Wie sollten Sie dieses Buch nutzen ? di 
WıE ısT Eın BASIC-PROGRAMM ÜBERHAUPT AUFGEBAUT ? 
PLATZHALTER: Variable 

BEHÄLTER FÜR TEXTE: String-Variable Re 
ZAHLEN AM LAUFENDEN BAND: Indizierte Variable 
PLATZSPAREN: Integer-Variable mit % 
PLATZKARTENPFLICHT: Dimensionierung mit DIM 
GANZE TABELLEN: Mehrfache Indizierung 

NEN SPEICHER VOLLSTOPFEN: Komprimierte Daten 
DER GERETTETE HI-Score 


Dıe HERKUNFT DER DATEN 


EINGABEVERFAHREN UND ANDERES 


Mır 10 Fingern BLIND ? Die Tastatur - ganz übersichtlich 


WAS BEDEUTEN DIE ZEICHEN ? Festgelegte Tastaturzeichen 

UND DIE HELLEN TASTEN ? Benutzung der Funktionstasten 

Vom LosB DER FAULHEIT: Zeilennummern und Editiertricks 

ANHALTEN ZUM ESSENFASSEN: Eingaben mit INPUT 

Ganz IM VORÜBERGEHEN: Eingaben mit GET 

TASTEN ALS KLINGELKNÖPFE: Tastaturabfrage mit PEEK 

NICHT NUR TENNIS: Potentiometer, genannt Paddles 

DAS VERGNÜGUNGSSTEUER: Der Joystick 

STAPELWEISE DATEN: READ und DATA 

UND NUN WIEDER VON VORNE ! RESTORE 

Im LAUFE DER ZEIT: Die Zeitvariable TI 

MINUTEN UND STUNDEN: Die Zeitvariable TI$ 

SPITZ PASS AUF ! Messung der Reaktionszeit Ke 

Dıe BEFRAGUNG DES BILDSCHIRMS mit Lichtgriffel und mit 
RDOT(,) he ae ’2 

\IIE DER ZUFALL SO SPIELT: RND() 

Rechteckverteilungen 
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VERARBEITUNG MON TATEN 25. ee 


DER VC 20 ALS RECHENMASCHINE: Arithmetik 
VORFAHRT EINGEBAUT: Klammern und Prioritäten 
VERTZUWEISUNG mit = und mit oder ohne LET 


EINMAL STRING UND ZURÜCK: STR$() und VAL() 
BANDWÜRMER LÄNGER MACHEN: String-Verkettung mit + 
Das MaRBAnD: LEN() ee ee ee de 
Von KÖPFEN UND SCHWÄNZEN: LEFT$(), RIGHT$() und MID$() 
Von MÜCKEN UND ELEFANTEN: Vergleichen und Ordnen mit =<> 
LOGISCH ODER ? Wahrheitswerte und Binärzahlen 
SCHNITZELJAGD: Der unbedingte Sprung mit GOTO 
ÄBSTECHER: Unterprogramme mit GOSUB eh 
DER LOGISCHE VERSCHIEBEBAHNHOF: Der Sprungverteiler ON 
Im FALLE EINES FALLES: Bedingte Anweisungen mit IF 
Das GANZE GLEICH MEHRMALS: Schleifen mit FOR und NEXT 
Wo BIN ICH ? Silbentrennung mit POS() he 
DIE GANZ DIREKTE ToUR: Schreiben und Lesen im Speicher 
mit POKE und PEEK() 


DıEe AUSGABE VOoN DATEN 


DER VC 20 ALS PROGRAMMIERTER RECHNER: Zahlenausgaben 
DER VE 20 ALS DIALOGPARTNER: Text-Ausgaben 

VIELE SORTEN GRAFIK FE EEE GE u ERROR 
SCHNELL UND EINFACH: Bilder mit PRINT und Normalgrafik 
MANCHMAL BESSER: Bilder mit POKE und Normalgrafik 

GAR NICHT SO GROB: Feine Balkengrafik 23 x 176 
MITTELFEINES: Viertelgrafik mit 44 x 46 Punkten 
UNGEAHNTE FREIHEITEN: Bildschirme und Characters im RAM 
JEDE MEnGE BUCHSTABEN: Character-ROM und RAM 

PUNKT FÜR PUNKT EIN BUCHSTABE: Das Buchstaben-Design 
NEUE AÄLPHABETE ZAUBERN: Eigene Zeichen im Character-RAM 
GrRoOßE RANGELEI IN KLEINEM SPEICHER 

GLEITENDE ZIFFERN Eu 

WENIGER SPALTEN, WENIGER ZEILEN Bet 

DAS IST JA GROTESK ! Etwas höhere Buchstaben 
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FEINGRAFIK HAUSGEMACHT 


Ist da schon ein Punkt 


> 


Kann man auch einen Punkt Älöschen ? 


Und inverntiernen ? 


Linienziehen 


NOCH ETWAS RAFFINIERTER: mit einer scheinbaren Doppel- 


beleqgung 
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UND NUN IN BUNT: Feine Punkte, grob koloriert 
RunTE FARBEN, FEINVERTEILT: Multicolor, selbstgemacht 
Muflticolor mit Koordinaten 


UnD NUN DAS GANZE AUTOMATISCH | Grafik mit dem Super- 


Expander 


PUNKT FÜR PUNKT EIN BILD: Koordinaten mit POINT 

VERDREHT UND VERZERRT: Koordinaten-Umrechnungen 

FEINGRAFIK MAGNETISCH GESPEICHERT: Bildinhalte auf 
Band oder Diskette 


Das schnelle Bild 


WIE MAN IN DIE SUPER-GRAFIK HINEINPFUSCHEN KANN: 
nämlich mit POKE DL a BE 

SCHWARZ AUF WEIB NnAcH HAUSE TRAGEN: Der VC 1525 als 
Feingrafikdrucker 


Bilder, die von oben nach unten benechnet wenden können 


Panameter-Darnstellungen 


Eine Mischform 


DEN BILDSCHIRM ABDRUCKEN: Hardcopy bei Feingrafik 


HAT DER VC 20 Töne 


? Musik über den Fernsehkanal 


UND NOCH EIN TONKANAL: Musik über den User-Port 


ÄANREGUNGEN FÜR SPIELE UND PROGRAMME 


Die ZEIT IM BILD: 


Darstellungen der Zeit 


Quiz UND NATENSPEICHER: Abfragen als Spiel und als 


Service 


wozu MuLTIcoLoOR ? Auflösung gegen Mehrfarbigkeit 


PIEPT ES BEI IHNEN 
Tönen 

KORTSPIELE 

IST DAS ETWA KunsT 


DAUERND ? Vom sparsamen Umgang mit 


? Computer-Grafik zum Anschauen 
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WAS MAN SO ALLES SPIELEN KANN: Allgemeines über 
Spielprogramme 

Strategiespiele 

Glückspiele 

Gedächtnisspiele . 

Geschicklichkeitsıpiele Be ae Dr Tee ah > LG 

RECHNEN KANN ER ÜBRIGENS AUCH: Vom Rechnen und 
Simulieren De er 

Wie genau ist Ihr VC 20 eigentlich ?. > rs 

NICHTS FÜR SIMULANTEN: Beispiele für Simulationen 
Beschleunigung im Labyrinth 
Den fallende Besen . 
Thermostat . ; 

FIBONACCI UND DER GOLDENE SCHNITT 

Fin PROGRAMM SCHREIBT SICH (FAST) SELBST 


ANHANG 


ÜBERBLICK ÜBER Das BASIC nes VC 20 unD DES SUPER- 
EXPANDER: sur ar u on Bo er 

STEUERZEICHEN IN DEN AusLISTungen Be nr 4 

TABELLEN FÜR DIE BENUTZUNG DER FESTEN GRAF IKZEICHEN 
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Ohne die kritische Durchsicht des Manuskriptes durch 

die Herren Ralf Hecker (dem ich einige besonders gute 
Tips verdanke), Jörg Kalthoff, Jörg Unger (alle Duisburg) 
und meinen Vetter Klaus Treitz (Rheinfelden) wäre dieses 
Buch um einiges unlesbarer, ärmer an Ideen und reicher 

an Fehlern. Ihnen sei auch hier dafür herzlich gedankt. 
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LIHZ= =ÜLL DIESES EUCH 
Fine Art Vin waor-t 


Seitdem ich auf dem VC 20 Programme schreibe - teils 

für den Physikunterricht, teils nur zum Vergnügen -, 
habe ich so allmählich eine ganze Reihe von Erfahrungen 
und Tricks gesammelt. Einige ergaben sich aus der An- 
wendung von Binärzahlen, etwas Logik und den Beschrei- 
bungen gewisser besonders trickreich genutzter Speicher- 
plätze, andere habe ich aus Andeutungen in verschiedenen 
Clubmitteilungen oder höheren Anleitungsbüchern zusammen- 
gesucht. Es kommen relativ oft die direkt auf den 
Speicher zugreifenden Schreib- und Leseanweisungen POKE 
und PEEK vor. Besonders wichtig ist mir dabei die Gra- 
fik, die man vollständig ohne Superexpander erzeugen 
kann, mit diesem Zusatzgerät aber wesentlich übersicht- 
licher und in der Ausführung schneller. 


Sie finden in diesem Buch: 


e Anmerkungen und Tricks zu BASIC-Anweisungen 
und gewissen POKE-Adressen 


e besseres Verständnis der Grafik (und damit 


einige zusätzliche Tricks) 
e Programmbausteine und kurze Beispielprogramme 


e Anregungen zu eigenen Programmen 
Sie finden nicht oder kaum: 

e Maschinenprogrammierung, 

e fertige längere Programme, 

e Anleitungen zu Hardware-Arbeiten 


e vollständige Verzeichnisse über Speicherplätze. 


Solche Abhandlungen gibt es bereits in anderen Büchern, ebenso 
wie es viele geräteneutrale Bücher über BASIC gibt. Hier ist 
stattdessen einiges zusammengestellt, was dem fehlt, der 
eigene Programme schreiben will und dazu noch einige Tricks 
gebrauchen kann. 


Wie sollten Sie dieses Buch nutzen ? 


Es ist nicht zum alleinigen Lesen gedacht: Ein VC 20 sollte 
schon bereit stehen, damit Sie alles auch ausprobieren können. 
Auf der anderen Seite ist es auch keine Sammlung von Pro- 
grammen zum gedankenlosen Eintippen,; das können Sie zwar 
auch hin und wieder mit den Beispielen machen, aber im 
Endeffekt sollten Sie fast alles, was Sie da tippen, auch 
im Laufe der Lektüre verstehen, so daß Sie es gezielt ab- 
wandeln können. Viele Beispiele sind bewußt mager gehalten, 
quasi als Skelette für ausgebaute Programme, die Sie dann 
selbst daraus entwickeln können. 


Die Abschnitte des Buches sind nicht so angeordnet, daß man 
sie von vorne nach hinten lesen muß und dabei nur das be- 
nutzt, was weiter vorne schon dran war. Es kann durchaus 
sein, daß irgendwo etwas benutzt wird, was weiter hinten noch 
ausführlicher erklärt wird. Meistens sind das Dinge, die Sie 
schon aus den normalen Gebrauchsanweisungen zu den Geräten 
mehr oder weniger kennen; benutzen Sie das Register sehr 
ausgiebig, wenn Sie Näheres über eine Anweisung oder ein 
anderes Stichwort suchen. 


Lassen Sie sich auch nicht abschrecken, wenn Ihnen etwas zu 
"speziell" vorkommt: Es kommen einige mathematische Beispiele 
und Tricks vor, aber es ist nicht schlimm, wenn Sie nicht 
jeden Trick auch wirklich durchschauen (wer durchschaut schon 
alles, was er benutzt ?!). Vielleicht steigen Sie aber beim 
zweiten Lesen etwas. tiefer z.B. in die Binärzahlen und die 
logischen Verknüpfungen ein und genießen dann die Eleganz 
ihrer Anwendungen. 


Die wichtigste Regel: Probieren Sie eigene Ideen ausy dieses 
Buch soll Ihnen Anregungen dazu geben, nicht mehr, aber auch 
nicht weniger |! 


IHJIE IST EIH ERS IT- FROSrRrArTn 


NEERHRAUPFT AUFGEBAUT 7 


Man könnte fast sagen: völlig beliebig. Etwas ernsthafter: 
Formal besteht ein BASIC-Programm aus Zeilen, deren jede mit 
einer Nummer beginnt und im übrigen nur zugelassene Zeichen 
enthält. Inhaltlich gibt es keine vorgeschriebenen Regeln 

für die Gliederung: Anfang und Ende müssen nicht besonders 
gekennzeichnet werden. Es gibt aber eine ganz wichtige Regel]: 
Wir müssen den Computer so durch das Programm lenken, daß er 
alle Informationen, die er benötigt, bekommt, bevor er sie 
benutzen soll. Soll er zum Beispiel etwas mit X malnehmen, so 
muR er zu dem Zeitpunkt schon "wissen", welchen Wert X haben 
soll; es nützt nichts, wenn er es später zu lesen bekommt. 
Denken Sie sich also immer beim Programmieren ein Männchen, 
daß Ihre Anweisungen in der Reihenfolge der Zeilen mit Beach- 
tung der Sprünge liest und ausführt, das Männchen hat ein 
sehr gutes Gedächtnis für alles schon Gelesene, ist aber kein 
Hellseher.Von den mathematischen Symbolen kennt es nur die in 
BASIC eingebauten, und es versteht auch nur genau die Schreib- 


weise, die hier benutzt wird. 


Jede Programmzeile darf auf dem VC 20 bis zu vier Bildschirm- 
zeilen lang sein (bei der Eingabe; wenn Sie die Schlüssel- 
wörter abgekürzt schreiben oder die Leertaste nach der Zeilen- 
nummer nicht eintippen, kann die Zeile nachher in der AusLISTung 
länger sein: das ist genau dann störend, wenn Sie sie noch än- 
dern wollen). Sie beginnt mit einer Zeilennummer, nämlich ei- 
ner ganzen Zahl zwischen P und 63999(beide eingeschlossen). 
Außer dieser Nummer enthält die Zeile eine oder mehrere An- 
weisungen, zwischen denen je ein Doppelpunkt steht. Die Zeilen 
werden im Rechner automatisch nach aufsteigenden Zeilennummern 
geordnet. Beim Lauf (RUN) werden sie auch in der gleichen Rei- 
henfolge bearbeitet, sofern nicht durch Sprunganweisungen in 
ihnen etwas anderes vorgeschrieben ist. Weder die letzte Zei- 
le der Ausführung noch die letzte Zeile der Liste werden be- 


sonders gekennzeichnet. Das Programm endet, wenn es auf END 


oder STOP stößt oder die letzte Zeile bearbeitet hat. Norma- 
lerweise (d.h. wenn nicht ein Graphic-Modus des Super-Expan- 
ders eingeschaltet ist) wird das Ende dann mit READY und einem 
Zeilenvorschub verkündet, der möglicherweise ein schönes Bild 
zerstört. In solchen Fällen empfiehlt es sich, das Programm 

in eine Endlosschleife laufen zu lassen: 63999 GOTO 63999. 

Es ist durchaus zu empfehlen, ein Programm zu gliedern und 
insbesondere einen Vorbereitungsteil zusammenzustellen, in 

dem Dimensionierungen, INPUT-Abfragen und Wertzuweisungen von 
Konstanten in Variable (besonders wenn sie öfter vorkommen) 
enthalten sind. Über DATA muß hier etwas im Vorgriff gesagt 
werden, da hier das Prinzip verlassen wird, nach dem ein 
Programm mit Sprüngen abgearbeitet wird: Die Sprünge (mit 

GOTO oder GOSUB) sind auf die Reihenfolge der DATA unwirksam; 
beim Einlesen mit READ sucht der Computer also im Programm- 
text den nächsten Inhalt einer DATA-Anweisung, völlig unab- 
hängig vom übrigen Programm. Es ist daher auch gleichgültig, 
ob die DATA vor oder nach den zugehörigen READ-Anweisungen 
stehen: In Programmen mit Sprüngen stellt man am besten alle 
DATA am Anfang oder am Ende zu einem Block zusammen, und zwar 


in der Reihenfolge, in der das Programm mit READ zugreift. 


PLRARTZHRALTER : 


ar-ıiable 


Unter Variablen kann man sich Speicherplätze vorstellen, 

die statt der Nummern Namen tragen; der Computer kümmert sich 
alleine darum, wo er sie unterbringt. Es gibt drei Sorten: 
String (=Text) und zwei Sorten von Zahlen, nämlich kurze und 
lange (vornehmer gesagt: 5-Byte-Zahlen mit Gleit-Dezimalpunkt 
und 2-Byte-Ganzzahlen). Nehmen wir zunächst die normalen 


(langen) Zahlen: 


Sie werden auch als REAL-Zahlen, also reelle Zahlen bezeichnet, 
obwohl es beim Computer keine unendlich langen Dezimalzahlen 
geben kann. Sie erhalten die einfachsten Variablennamen: 

z.B. A AS B3 YX usw., das erste Zeichen ist auf jeden 

Fall ein Buchstabe. Danach kann noch eine Ziffer oder ein 
zweiter Buchstabe folgen. Es ist in BASIC zulässig, die 

Namen noch länger zu machen, aber der VC 20 kümmert sich 

nur um die ersten beiden Zeichen, er nimmt also z.B. SUMX 

und SUMY für die gleiche Variable. Außerdem muß man aufpassen, 
daß in den Namen keine BASIC-Schlüsselwörter vorkommen, wie 
TAN in STANDARD oder AND in ANDREAS. Es ist daher sehr zu 
empfehlen, nur zwei Zeichen für jede Variable zu nehmen. 

Da ist die Gefahr, ein Schlüsselwort zu verwenden, geringer: 
nicht zulässig sind die Zeichen: FN GO IF ON TI TO und bei 


den Stringvariablen T1$. 


Eine Variable steht in einem BASIC-Programm stets stel]- 
vertretend für ihren augenblicklichen Wert (nämlich während 
der Programmausführung !). Ob A = B ist, hängt also oft von 
dem Zeitpunkt ab, in dem danach gefragt wird. 


("Reelle") Zahlen werden nicht dezimal, sondern als Binärzahlen 
gespeichert, und zwar in 5 Bytes”: 7 bit für den Zweier-Expo- 
nenten und ] für dessen Vorzeichen (nämlich von -128 bis 127), 
I bit für das Vorzeichen der Zahl selbst und die restlichen 

3] bit für die Ziffernfolge (was etwa einer Genauigkeit von 

10 Dezimalstellen entspricht). Der Zahlenbereich ist damit ca. 
auf + [0° begrenzt. Beim Überschreiten bricht das Programm 

mit Overflow-Meldung ab. Viel schlimmer ist es, daß Zahlen ca. 


zwischen ae und Ban einfach auf ® gesetzt werden, ohne 
daß eine Fehlermeldung kommt: Treten solche Zahlen als Zwischen- 


ergebnisse auf, so verschwinden sie, ohne sich abzumelden ! 


“71 Byte besteht aus 8 Bit, ein Bit ist die Information 


einer Binärziffer, d.h. die Entscheidung zwischen ® und T. 


EEHÄLTER Fir TEHTE 
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Str imma etz I abo ler 

Daß man "Computer" nicht mit "Rechner" übersetzen sollte, 
wird sehr deutlich, wenn man sieht, daß in BASIC die Ver- 
arbeitung von Textstücken ("Strings") fast genau so gut 
möglich ist wie die von Zahlen. Ein String kann bis zu 
255 Zeichen lang sein (Sie können aber mit INPUT ein so 
langes String nicht an einem Stück eingeben). Die String- 
Variablen erhalten als Kennzeichen $ am Schluß, z.B. A$, 
M4$ oder bei indizierten String-Variablen (auf die wir 
noch kommen) BX$(J) usw. Es können auch Zahlen als Texte 
behandelt werden, aber der Computer kann dann nicht ohne 
weiteres mit ihnen rechnen. 


ZAHLEN RI LÄUFEHDEHN EHHT 
T{vıJizierte "YWarıiıiabole 


Oft hat man Variable, die zusammengehören und mit denen 
das selbe gemacht werden soll, z.B. bestimmte Angaben über 
8 verschiedene Staaten. Man könnte nun die Einwohnerzahlen 
EI bis E8 nennen und die Flächen F] bis F8. Soll der 
Computer nun die Quotienten ausrechnen, so bräuchte man 
8 einzelne Anweisungen: QI=E1l/F] usw. Mit den indizierten 
(d.h. numerierten) Variablen geht das vie] einfacher: 
Die Einwohnerzahlen seien E(1) bis E(8), die Flächen F(]) 
bis F(8). Jetzt kann der Computer selbst die Indices von |] 
bis 8 einzeln drannehmen, etwa so: 

19 FOR I=1. 10.8: INPUT ELI)SFELIENEXT 

28 FOR I=1 TO 8: PRINT E(I)/FÜI):NEXT 
Das lohnt sich natürlich erst, wenn nochmehr mit diesen 
Zahlen geschehen soll. Die Indices dürfen auch 9 sein, 
aber nicht negativ. Man kann auch höhere Zahlen verwenden, 
z.B. von 35 bis 43, aber man benötigt dann den Speicherplatz 


für die darunterliegenden Nummern mit. 


* außerdem ist ab Index 10 die Anweisung DIN nötig. 


Damit sind wir bei einem wichtigen Thema: dem Speicherplatz- 
bedarf der Variablen. Solange es sich um einzelne handelt, 
hält er sich in Grenzen, wenn aber ein Index bis 199 

laufen soll, lohnt sich ein näherer Blick: 


In indizierten Variablen benötigt der VC 20 pro Zahl folgende 


Plätze: 5 Bytes für normale (lange = REAL) Zahlen, 


2 Bytes für kurze (INTEGER) Zahlen, vgl. unten, 
3 Bytes für Strings. 


Soll also der Index J einer Variablen X(J) bis 700 laufen 
dürfen, so werden 5'700 Bytes = 3500 Bytes benötigt (es 
sind genaugenommen noch ein paar mehr, die aber nicht ins 
Gewicht fallen). 


Daß der Computer bei den Strings mit 3 Bytes auskommt, ob- 
wohl die doch bis zu 255 Zeichen (also 255 Bytes) lang 

sein dürfen, verdanken wir einem pfiffigen Trick: Dieser 
bescheidene Platz wird benötigt, um die Stelle zu kennzeich- 
nen, an der das String ohnehin schon steht (z.B. im Programm- 
text in einer DATA-Zeile): Dann genügen 2 Bytes für die 
Anfangsadresse (16 bit wegen der 216 Adressen im VC 20) und 
ein Byte für die Länge (die ja genau deswegen auf 255 be- 


grenzt ist). 


FLATZSFAREH ': 
IHTEGER—Yarisbils mit % 


Wenn Sie nun der Meinung sind, daß Sie lieber viele 

xleine (oder abgerundete) Zahlen haben wollen als wenige 
ausführliche, können Sie die sogenannten "Integer-Variablen" 
verwenden, deren Kennzeichen’ein 4 am Schluß ist, z.B. 


TE a EEE 


" Dus Symbol % hat nichts mit dern normalen Bedeutung [Pro- 


zent) zu tun. 


AX% oder BV%( ) oder L%( }. Es lohnt sich jedoch nur bei 
indizierten Variablen und auch dann nur, wenn man viele 
Bytes einsparen kann (bei nichtindizierten gibt es überhaupt 
keine Einsparung). 


Damit der Computer nun mit 2 Bytes auskommt, um sich eine 


16 verschiedene Werte haben. 


Zahl zu merken, kann diese nur 2 
Es ist festgelegt, daß dies die ganzen Zahlen von -32768 


bis +32767 sein sollen (bekanntlich ist 21°.32768). 


Nun kann es ja vorkommen, daß wir aus Gründen des beschränk- 
ten Speicherplatzes [und wo wäre das aktueller als beim 

VC 20 ?) auf INTEGER-Variable ausweichen müssen, obwohl 

die tatsächlichen Zahlen über den genannten Bereich hinaus- 
gehen oder auch zwischen Q und ] liegen. In beiden rällen 
müssen wir uns zuhelfen wissen. Nehmen wir an, daß MA eine 
Zahl ist, die auf jeden Fall größer als der Betrana der 
größten (bzw. kleinsten negativen) in Frage kommenden Zah! 
ist. Wir teilen dann alle Zahlen durch MA und multiplizieren 
sie mit 312 oder mit 30000. Jetzt haben wir sie in dem Bereich, 
den wir mit INTEGER-Variablen behandeln können,und speichern 
sie ab. Später müssen wir die Umrechnung natürlich wieder 
irgendwann rückgängig machen. Dieses Verfahren ist auch dann 
sinnvoll, wenn es sich etwa um Zahlen zwischen O und 100 
handelt, die aber nirht von selbst ganzzahlig sind: Ohne die 
Umrechnung würden sie durch das Abrunden auf 1/100 der 
größten Zahl ungenau gemacht, mit unserem Trick aber nur 

auf 1/30000 der größten ungenau. 


DD 


FLATZERARTEHFFLICHT: 


Limen=1i1conier-unyn5 wit DIM 


Format: DIM v(n) 
DIM v(n]l,n2) USW. 
DIM vl({nl),v2(n2) USW. 
mit: Variablennamen v() vlt) v2() 


n: nl °N2 positive ganze Zahlen als jeweils 
höchste Indices 


Im Speicher liegen die Werte für indizierte Zahlenvariable 
bzw. die "Zeiger" für Stringvariable schön hintereinander; 
dazu muß der Computer wissen, wie viele es werden sollen. 
Um uns einerseits Arbeit zu ersparen und andererseits mit 
dem Speicherplatz nicht zu verschwenderisch umzugehen, räumt 
er jeder indizierten Variablen, die im Programm auftaucht, 
Plätze für die Indices @® bis 18 ein. Falls wir mehr 
brauchen, müssen wir das vorher (!) anmelden, ebenso bei 
mehrfacher Indzierung (z.B. X(I,J)). Für diese Voranmeldung 
des benötigten Platzes gibt es die Anweisung DIM (von "Di- 
mension"), die vor dem ersten Erscheinen der entsprechen- 


den Variablen bearbeitet werden muß. Soll z.B. die String- 


varıable A2$( ) mit den Indices bis 23 laufen, so heißt 

die Anweisung: DIM A2$(23), bei mehrfachindizierten ähnlich: 
DIM A%(3,5) kündigt an, daß der erste Index bis 3, der zweite 
bis 5 laufen darf. Beachten Sie bitte, daß es zunächst völlig 
gleichgültig ist, ob Sie den Index später I oder K3 oder 
sonstwie nennen: Bei der Dimensionierung geht es nur um die 
Zahl (auch sonst können Sie eine Variable, die Sie als A(I) 
einlesen, später als A(K) abfragen usw.). 


Die Flexibilität von BASIC bewährt sich auch daran, daß 


die Dimensionen erst im laufenden Programm entschieden werden 
müssen, z.B. 


1a IHPUT"ZAHL DER SPIELER ";H 

28 DIM HECH>.PCHO 

3a FOR I=1 TüH 

43 PEIHT"WIE HEISST SPIELER HR."sI 
>89 IHFUT HECTIH:HNEAT 


Hier werden also eine Namensliste und für jeden Spieler 
ein Punktkonto eröffnet. 


GAHZE THEELLEH 


mzsehr-fache IndiziermıunDdga 


Die einfache Indizierung entspricht Zahlenkolonnen. Oft 
braucht man auch Zahlen, die logisch in eine Tabelle 
(Matrix) gehören oder sogar in eine Staffel von Tabellen. 
Das wird an einem einfachen Beispiel klar, bei dem es um 
die Wahlergebnisse von drei Parteien bei vier Wahlen geht: 


ia DIM 3.2.33 

25 FOR Isa Tü 2:FÜR Isa TO 23 | | 
=3 PRIHT"PARTEI HR. "Ir; "MAHL HR." J+1: IMPUT UL. TO 
49 NE#XT:NE#T 

sa FOR I=sA TO 2:3U=8:FÜOR I=sg TO 23 

5A SUl=5U+5C1L, I2:HEAT 

”5 FRINT"DURCHSCHHITT FARTEI ":1+1:5U74 :NE&T 


DeH SPEICHER “OLLSTOPFEH 


HuoüsrmnFr-ıimlienrte Daten 


Wenn man viele einfache Informationen (z.B. Ja/Nein-Ent- 
scheidungen) speichern will, kann es im VC 2@ ganz schön 
eng werden, wenn man jede einzelne als Variable notiert, 
die ja zumindest 2 Bytes belegt (wenn man Integer-Variable, 
also mit angehängtem %-Zeichen nimmt). Die Mathematik ist 
bekanntlich dazu da, uns das Leben zu erleichtern (!). 
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Eine solche Integer-Variable kann 65536 = 2 verschiedene 


Werte annehmen, denn sie wird intern als 16-stellige Zahl 
mit ® und ] als möglichen Ziffern (also als 16-stellige 
Rinärzahl) aufbewahrt. Der Trick besteht nun darin, auf 
diese Binärziffern einzeln zuzugreifen. Das folgende Pro- 
gramm gibt ein Beispiel dafür (wenn auch kein besonders 
lohnendes: das sind dann die ganz langen Programme, in 
denen der Platz für die Daten knapp wird). Über Binärzahlen 
und die logischen Operationen AND und OR wird später noch 
mehr gesagt. Hier sol] die Andeutung genügen, daß die 
Binärziffer Nr. I (bei der Numerierung von rechts nach 
links von ® z.B. bis 15) die Zahl 21 darstellt. Wenn man 
sicher ist, daß sie vorher ß war, kann man sie einfach 


durch Addition von pl zu ]I machen (wenn man nicht sicher 


Sn REM 9 WEREIME MIT BIHNAER-FRESTSTER 


IHFLUT"ERHL DER PERSÖOHEHN"SFEDIM HPFEP-12:DIM Raef-1 
FÜR Isa TO F-i 

FREIHTUHAME FERSON HR."T+1::IHFUT HPENT? 
HEAT 

IHFUT"ERHL DER YEREIME"SWEDIM HWELY-15 
FÜR Isa TO W-1 

PEIHT"HAME WEREIN HR." T+15: IHMFUT MYECT 
HEAT Ä 

FRIHT"EITTE MITGLIEDSCHAFT" 
FRIHT:FREIHTTEIHGEREN: Th" 

FÜR Ist TOD F-1:FORJ=2 TO Y-1 

FRIHT:FRIHT HREEIS" IM O"MWEOTSSCIHFUT A 
IF A$="T" THEH HEETSSHSCTDHZTI 

HEART: HNEAT 

FÜR Isa TO P:FOrR T=a TO %Y 

IF CHACT>AHDZTT)=8 THEHN 328 

FRIHTHFEEIH" IST IM "MWECTO 

HEAT:HEMT 


Zr Tr 


Da 
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sein kann, nimmt man dafür statt der Addition die Operation 
OR. Herausfischen kann man diese Ziffer auf jeden Fall mit 
AND. - Wegen der Deutung des höchsten Bit als Vorzeichen 
ermöglicht diese Methode nicht 16, sondern nur 15 Ja/Nein- 
Entscheidungen auf diese Weise in einer Integer-Variablen 
unterzubringen und aus ihr abzufragen. - Eine andere Mög- 
lichkeit ist das Zerlegen eines String in einzelne Bytes, 
die dann jeweils 8 Bits enthalten. Falls sie über den 
ASCII-Code aufgerufen werden (und nicht mit PEEK), ist es 
aber mühsam und umständlich, mehr als 5 Bit aus jedem Byte 
zu entnehmen (das ist dann etwas für Tüftler). 


DER GERETTETE HI-SCOrFE 


Daten “or RllH (nd JR bewahren 


Wenn Sie ein Programm neu starten (mit RUN, auch mit einem 
adressierten RUN, z.B. RUN 1888), werden alle Variablen 
gelöscht, d.h. auf die Zahl @ bzw. auf das leere String "" 
gesetzt. Mit der Anweisung CLR (die man eigentlich kaum 
jemals benötigt) erreicht man dasselbe. Wollen Sie nun 

Daten aus einem Programmlauf, z.B. eine Maximalpunktzahl 
(Hi-Score) als Information in das nächste Spiel] retten, 

so können Sie entweder das neue Spiel mit GOTO starten und 
alle Variablen, die gelöscht werden dürfen und müssen, 

durch ausdrückliche Wertzuweisungen löschen. Eine andere 
Möglichkeit besteht darin, Daten durch das Löschen hindurch- 
zumogeln, indem man sie mit POKE in einem Speicherbereich 
ablegt, der nicht von CLR (und damit auch nicht beim Löschen 
durch RUN) erfaßt wird, z.B. im Bildschirmspeicher, oder noch 
besser in seiner "unsichtbaren" Verlängerung: der Bild- 
schirm hat nur 5@6 Plätze, dahinter sind noch 6 Bytes frei. 
Mit einer POKE-Anweisung können Sie ein Byte (also eine Zahl 
von @ bis 255) oder auch nur eine Dezimalziffer ablegen, wenn 


Sie das übersichtlicher finden. 
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Eingabevenrtfahren und anderes 


Ein Computer ist ganz allgemein ein Gerät, das mit Daten, die 
sich als Zahlen verschlüsseln lassen, irgendetwas macht und 
dann etwas abliefert. Woher nimmt er nun die Daten ? Der 
VC 20 bietet da eine erstaunlich breite Palette an: 
Il. Eingabe über Tasten (Zahlen, Wörter, einzelne 
Zeichen, Steuertasten) 
2. spezielle Eingabegeräte: Joystick, Paddles, 
Lichtgriffe] 
3. Zwischenergebnisse aus seinem eigenen Speicher, 
auch aus dem Bildschirmbereich (RDOT) 
4. im Programm festgelegte Daten (Konstanten, 
READ - DATA) 
Abfrage der internen Uhr (TI,TI$), 
Zufallsgenerator (RND()) 
Einlesen von Tonbandcassette oder Diskette 


oO N. 0 


Eingaben über externe Geräte, die am User-Port 
oder über einen IEC-Bus angeschlossen sind 
und z.B. externe Meßgeräte oder Fühler ablesen. 


In diesem Buch geht es hauptsächlich um die ersten 6 Möglich- 
keiten. 
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iıı FIMNGEFRHN ELIHDO 
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"Zt. — Ssarnz über=ichtlich 


Der wichtigste Weg, etwas in den VC 20 einzugeben, führt 
über die Tastatur. Wenn Sie mit Schreibmaschinen vertraut 
sind, müssen Sie auf Y und Z aufpassen: die sind hier ver- 
tauscht. Außerdem müssen Sie sehr genau zwischen dem Buch- 
staben O0 und der Ziffer ® unterscheiden. Fast alle Tasten 
sind doppelt oder sogar dreifach belegt. Deshalb gibt es 
nicht nur den gewöhnlichen Umschalter (SHIFT), sondern 
auch noch einen zweiten (C=, auch Commodore-Taste genannt) 
und einen dritten: CTRL (control). Sie haben alle gemeinsam, 
daß man sie gedrückt halten muß, während man eine normale 
Taste anschlägt, deren zweite oder dritte Bedeutung man 
haben will] (also nicht gleichzeitig anschlagen, weil dann 
der IImschalter möglicherweise etwas zu spät kommt; aber 
auch nicht zu früh loslassen). Die Zuordnung ist ziemlich 
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einfach: CTRL ist zum einen für die Farben, die auf den Ziffern- 
Tasten angesiedelt sind; leider stimmen die Ziffern auf 

den jeweils gleichen Tasten nicht mit den Code-Nummern der 
Farben überein, sondern sind um ] versetzt: Schwarz hat die 
Nummer @, etwa in der COLOR-Anweisung, kann aber im Klar- 

text einer PRINT-Anweisung mit Control-Taste und Taste ] 

gewählt werden. Zum anderen wird CTRL auch für das Ein- und 
Ausschalten von REVERSE, zusammen mit den Tasten RVS ON bzw. 

RVS OFF, verwendet: bei REVERSE werden sozusagen die Farben 


von Papier und Tinte vertauscht (auch Negativschrift genannt). 


Bei den dreifach belegten Tasten ist SHIFT für die rechts 
unten angeschriebenen Zeichen zuständig, die links von der 
linken SHIFT-Taste angebrachten "Commodore-Taste" C= für die 
links unten angeschriebenen. 


Drücken Sie auf SHIFT und C= zugleich, kommen Sie in den 
zweiten Zeichensatz, bei dem Sie ohne SHIFT Kleinbuchstaben 
schreiben und mit SHIFT Großbuchstaben, wie bei einer nor- 
malen Schreibmaschine. Die Grafikzeichen, die rechts unten 

an den Tasten stehen, fehlen in diesem Zeichensatz. Das Um- 
schalten von einem Zeichensatz in den anderen wirkt sich 

auf den ganzen Bildschirm aus, also auch auf das schon Ge- 
schriebene, man kann also nicht beide zugleich im Bild haben. 
Beim Programmieren spielt es keine Rolle, welchen Sie ver- 
wenden; programmierte Umschaltungen macht man entweder mit 
PRINT CHR$(14) (in den zweiten Satz, also dem mit den Klein- 
buchstaben) bzw. PRINT CHR$(142) (zurück zum ersten mit dem 
vollständigen Grafiksatz). Man kann das auch mit POKE be- 
werkstelligen, und zwar muß in den Platz 36869 die Zahl gemäß 
Kleind. 
240 
192 











dieser Tabelle: 








ohne Erweiterung oder mit 3 kB 
mit 8 kB und/oder 16 kB Erweit. 





also z.B. POKE 36869,242 (dieser Speicherplatz hat es 
überhaupt in sich, vgl. Seite 84 ff.) 


Stehen auf der Oberseite einer Taste zwei Aufschriften, so 
gilt ganz allgemein die obere für SHIFT, die untere für die 
Taste allein (z.B. CLR und HOME). 


Während die Wahl des Zeichensatzes auf den ganzen Bildschirm 
(auch rückwirkend !) Einfluß nimmt, gelten die Farben und das 
Ein- und Ausschalten von REVERSE für alles, was danach ge- 
schrieben wird (unabhängig davon, wohin es geschrieben wird), 
bis Sie etwas neues bestimmen. Wenn Sie allerdings ein Gänse- 
füßchen setzen, werden Farben oder REVERSE nicht gewechselt, 
sondern es erscheint stattdessen ein seltsames reverses 
Zeichen. Normalerweise ist das sehr sinnvoll: Beim Program- 
mieren einer PRINT-Anweisung mit einem Klartext (z.B. PRINT 
"BITTE WARTEN !") kann man auf diese Weise Farbe oder RVS ON 
mitprogrammieren, wobei es sinnlos wäre, wenn nun die Anwei- 
sung selbst auch Eunt erschiene. Nach dem Gänsefüßchen wird 
die Farbsteueranwe:sung also nicht ausgeführt, sondern statt- 
dessen symbolisch vermerkt. Es gibt also für die Farben und 
für REVERSE einen :!rekten und einen indirekten (Programmier-) 
Modus: durch Tippen des Gänsefüßchens " schalten Sie zwischen 
beiden hin und her (wobei ein Löschen des Zeichens " auf dem 
Bildschirm mit DEL oder mit Zursor und Leertaste das Um- 
schalten keineswegs rückgängig macht). Wenn man das weiß, 
kann man sehr virtuos damit umgehen; wenn man es nicht weiß, 
fühlt man sich leicht vom Gerät genarrt. Mit der Return- 


Taste kommt man auf jeden Fall in den direkten Modus zurück. 


Vom Löschen war soeben die Rede: DEL (delete) löscht sozusagen 
im Rückwärtsgang; Sie können damit frisch geschriebene Fehler 
korrigieren. Sie können aber auch mitten in einen vorhandenen 
Text mit dem Cursor gehen und dort mit DEL (von rechts nach 
links) etwas entfernen, ohne daß eine Lücke bleibt. 


Auch mit der Leertaste wird etwas gelöscht, im Gegensatz zur 


Schreibmaschine; zum Springen ohne Löschen gibt es ja die 
beiden Cursortasten (Merkregel: mit SHIFT in den umgekehrten 
Richtungen wie beim Schreiben, nach links bzw. oben); auch 
die Cursorbewegungen und die Funktionen HOME und CLR HOME 
werden nach einer ungeraden Zahl von Gänsefüßchen nicht 
ausgeführt, sondern symbolisch vermerkt. 


Etwas ganz Feines, was es bei normalen Schreibmaschinen nicht 
gibt, ist INST (insert): links neben dem blinkenden Cursor 
wird ein leerer Platz eingefügt, der sich automatisch im in- 
direkten "Gänsefüßchenmodus" befindet. Die Begrenzung der 


Länge von Programm-Zeilen gilt aber trotzdem. 


Noch eine ganz andere Bemerkung zur Leertaste: Zwischen 
BASIC-Schlüsselwörtern, Zahlen und Variablennamen usw. muß 
man sie fast nie setzen, man spart auf diese Weise Speicher- 
platz, andererseits muß man aber beim Lesen wie der Computer 
auch unter diesen Umständen alle Schlüsselwörter wiedererken- 
nen (z.B. BANDE bedeutet: B AND E). Es ist also eine Ent- 
scheidung zwischen dem Knautschen von Speicherplatz und Les- 
barkeit (für den Menschen). In einigen Fällen muß auch der 
Computer durch Leerzeichen vor Mißverständnissen bewahrt 
werden: Wenn Sie F OR G als FORG schreiben, liest der VC 20: 
FOR G. - Umgekehrt können auch zuviel Leerzeichen schaden: 

IN PUT statt INPUT wird nicht verstanden, die einzige Aus- 
nahme ist GOTO, wofür man auch GO TO schreiben darf. 


Vor einigen Mißverständnissen, die sich aus der nicht beson- 
ders glücklichen Beschriftung einiger Tasten ergeben, muß ge- 


warnt werden: 


Die RETURN-Taste hat nichts mit der BASIC-Anweisung RETURN 
zu tun, ihr Name bedeutet eigentlich Rückkehr zum Zeilenan- 
fang. Das ist aber das allerwenigste von dem, was sie tut. 
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Sie veranlaßt zugleich einen Sprung in die nächste Zeile. 
Beides zusammen heißt bei manchen Fernschreibern "Carriage 
return & line feed". Soll nur dieses geschehen, so ist die 
RETURN-Taste mit SHIFT zu drücken (also SHIFT schon etwas 
eher und dann gedrückt lassen). Die RETURN-Taste für sich 
alleine macht noch viel mehr: Befindet sich der Cursor (also 
das blinkende Rechteck) in einer Zeile mit einer Anweisung 
ohne Zeilennummer (wobei evtl. vier Bildschirmzeilen zu 
einer Programmzeile verknüpft sein können), so wird die 
Ausführung dieser Anweisung (oder wenn mehrere in der Zeile 
sind, aller dieser Anweisungen) veranlaßt. Kann der VC 2% 
in dem Text keinen Sinn erkennen, meldet er "SYNTAX ERROR". 
Noch ein Trick für ganz Faule: Steht der Cursor in einer 
Anweisung am Beginn einer Zeile, dahinter ein Doppelpunkt, 


gefolgt von sinnlosem Text, so klappt es auch. 


Steht am Beginn der (Programm-)Zeile, in welcher der Cursor 
blinkt, eine (zulässige) Zeilennummer, so wird die ganze 
Programmzeile (vor und evtl. auch hinter dem Cursor) unter 
dieser Nummer ins Programm aufgenommen, ohne Rücksicht auf 
Fehler (die werden erst bei der Ausführung aufgespürt, falls 
überhaupt). Eine evtl. schon vorhandene Zeile der gleichen 
Nummer verschwindet zugleich. - Im laufenden Programm spielt 
die RETURN-Taste eine wichtige Rolle bei der Anweisung INPUT: 
Eine Eingabe aus mehreren Zeichen wird damit abgeschlossen 
und gewissermaßen abgeschickt - vorher kann man sie noch 
mit DEL korrigieren. Diese ganzen Funktionen der RETURN- 
Taste entsprechen den Tasten ENTER oder EXECUTE bei anderen 
Rechnern, die Aufschrift RETURN ist also eine gelinde Unter- 
treibung. 

Mißverständnisse gibt es auch bei der RUN/STOP-Taste: Sie 
bewirkt gemäß ihrer unteren Aufschrift normalerweise STOP, 
mit SHIFT zusammen jedoch nicht RUN, sondern LOAD & RUN, 
also Laden eines Programms von der Tonbandcassette und an- 
schließenden Start. Man kann sich aber mit dem Super-Expan- 


20 


der eine der hellbraunen "Funktionstasten" zur RUN-Taste 
machen: mit der Anweisung (direkt, also außerhalb eines 
Programms) KEY 7,"ÜÜRUN"+CHR$(13) (Return-Taste). 


Auch die RESTORE-Taste hat nichts mit der gleichnamigen 
Anweisung zu tun. Sie wirkt (als Sicherung gegen versehent- 
liches Drücken) nur zusammen mit der STOP-Taste und ist der 
einzige Ausstieg aus einem Programm im Grafik-Modus des 
Super-Expanders oder bei einer INPUT-Abfrage. Sie setzt den 
VC 28 aber keineswegs in jeder Beziehung wieder in den Zu- 
stand, als wäre er frisch eingeschaltet. 


Einige Tasten (Leertaste, Cursor-Tasten, INST und DEL) haben 
normalerweise Dauerfunktion, d.h. bei längerem Drücken wir- 
ken sie so, als würden sie nach kurzer Wartezeit immer 
wieder (und dann etwas schneller) gedrückt. Beachten Sie das 
evtl. bei GET-Abfragen: Wenn Mehrfacheingaben stören, sollte 
man also nicht gerade auf das Drücken der Leertaste warten 
lassen. Man kann die Dauerfunktion auch abschalten oder 
auf alle Tasten ausdehnen: 

POKE 650,0 Normalzustand 

PNKE 659,128 alle Tasten mit Dauerfunktion 


POKE 650,64 keine Tasten mit Nauerfunktion 


Eingaben über die Tastatur kann man auf drei Arten abfragen: 
mit INPUT, mit GET und mit speziellen PEEK-Abfragen, 
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Sie können vom Programm her allen beliebigen Zeichen feste 
Funktionen zuweisen (z.B. den Klammeraffen @ als Taste für 
die nächste Spielrunde); einige Dinge liegen aber in BASIC 
fest, wenn sie außerhalb der Gänsefüßchen vorkommen: 


Das 


Der 


Das 


Der 


Die 


Das 


Das 


Das 


Die 


Der 
der 


zZ 


Semikolon ; wirkt hinter PRINT als Trennzeichen ohne 
Zwischenraum, nach INPUT trennt es den Fragetext von 
der betroffenen Variablen. 

Punkt . dient als Dezimalzeichen, d.h. er steht 
zwischen den Einern und den Zehnteln. 

Komma ,„ trennt gleichberechtigte Dinge, auf die eine 
Anweisung wirken soll, z.B. INPUT A,B,C oder 

DIM A(58),B(36),C(24). Hinter PRINT bewirkt es als 
Trennzeichen zwischen Variablen zugleich Weiterspringen 
in die nächste Spalte, was im Falle des VC 28 gleich 
über die halbe Bildschirmweite geht. 

Doppelpunkt : trennt Anweisungen innerhalb der gleichen 
BASIC-Zeile; die hinteren Anweisungen können in diesen 
Fällen nicht mit GOTO oder GOSUB angesprungen werden, 
wohl aber kann man aus einem Unterprogramm nach RETURN 
wieder dorthin zurück. 


Gänsefüßchen " rahmen Strings ein, ohne selbst zu ihnen 
zu gehören. Zwischen ihnen werden bestimmte Tasten- 
funktionen nicht ausgeführt, sondern markiert; man kann 
das mit DEL oder der RETURN-Taste umgehen. 
Dollar-Zeichen steht als Kennzeichen am Schluß aller 
Stringvariablen und Stringfunktionen. 

Fragezeichen dient als Abkürzung für PRINT (aber nicht 
in PRINT#) während der Eingabe. 

Doppelkreuz # steht am Schluß der an externe Geräte 
adressierten Anweisungen GET#, INPUT#, PRINT. 

Zeichen + - * / ® ( ) haben die bekannten arithmetischen 
Bedeutungen, ebenso die Zahl TU. 


Klammeraffe (@ und das Sternchen x haben beim Betreiben 
Diskettenstation spezielle Bedeutungen (vgl. Betriebs- 
anleitungen),. 
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UND DIE HELLEH TASTEN 7 


Benutzung Jer Funkticonstast 


in 


il 


"7 


Wenn man weder den Super-Expander noch den Programmier- 
hilfemodul hat oder sonst ein spezielles Programm(-paket), 


das auf diese Tasten zurückgreift, so ist ihr Nutzen tat- 
sächlich beschränkt. Man kann sie mit GET (aber nicht wie 
normale Buchstaben, sondern nur über den ASCII-Code, d.h. 
mit der Funktion CHR$()) oder mit speziellen PEEK-Funkti- 
onen abfragen: 

18 GET A$: IF A$=CHR$(133) THEN PRINT"F1" 

28 GOTO 18 


bzw. 10 IF PEEK(203)=39 AND PEEK(653)=0 THEN PRINT"FT" 


28 GOTO 18 


Sinnvoll wird das Abfragen etwa, wenn man in Abhängigkeit 
vom Drücken einer dieser Spezialtasten in ein bestimmtes 
Unterprogramm springt oder sonstwie in ein laufendes Pro- 
gramm eingreift (Gasgeben oder Lenken bei einem Autorennen 
z.B.). Es sind vier Spezialtasten, die mit SHIFT jeweils 
eine Zweitbelegung bekommen (mit der Commodore-Taste [= 
die gleiche), das sind also acht Quasi-Buchstaben. Im 
ASCII-Code haben sie acht verschiedene Nummern, beim Ab- 
fragen mit PEEK werden dagegen die vier Tasten und die 
Umschaltung mit SHIFT unabhängig voneinarder erfaßt: 





oben PEEK(283)=39 
T 47 
55 


unten 63 














PEEK(653)=-® 
ohne SHIFT 


PEEK(633) =] 
mit SHIFT 
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Beim Super-Expander kommen diese Tasten zu einer gewissen 
Geltung: Man kann sie mit Texten belegen, und sie sind 
auch schon mit einigen belegt, nämlich: 


ohne SHIFT mit SHIFT 










oben "GRAPHIC" "COLOR" 
L "DRAW" "SOUND" 
"CIRCLE" "POINT" 

unten "PAINT" "LIST"+CHR$(13) 


7 davon sind Spezialanweisungen des Super-Expanders, LIST 
ist gleich mit der RETURN-Taste (hier vertreten durch ihren 


ASCII-Code, der mit CHR$ wieder zu einem String gemacht wird) 
gekoppelt. 


Sehr nützliche Tastenbelegungen erhält man durch: 
KEY 7, "QRUN"+CHR$(13) 


oder KEY 1, "EZ LOAD"+CHR$(34) 
und KEY 3,"*"+CHR$(34)+",8"+CHR$(13) 


Mit der so belegten Taste f7 kann man ein Programm sehr 
bequem starten, sogar ohne den Cursor erst aus der LISTing 
herauszubewegen, denn das Löschen ist ja mit enthalten. 


Um ein Programm von der Diskette zu laden, tippt man nun 
nur noch auf fl, gibt den Anfang des Namens ein und tippt 
dann auf f3. Diese Belegungen haben den Nachteil, daß sie 
beim Abschalten verschwinden. Man kann die KEY-Anweisungen 
aber auch in ein kleines Programm schreiben, das man sich 
nach dem Einschalten des Gerätes (natürlich nur bei ange- 
schlossenem Super-Expander) in den VC 20 lädt und betätigt. 


Sicher wissen Sie noch ein paar andere Tipp-Prozeduren, die 
Ihnen lästig sind: Bis zu acht Stück können Sie auf diese 
Weise automatisieren. 
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Zeilennummern sind ganze Zahlen von ® bis 63999, sie 
dienen vor allem als Ziele für Programmsprünge: bei 


GOTO und GOSUB. Beachten Sie aber auch, daß nach einer 
nichterfüllten IF-Bedingung bei THEN an den Anfang der 
nächsten Zeile gesprungen wird (auch wenn in der alten 
Zeile mehrere Anweisungen auf das THEN folgen). 


Sinnvollerweise beginnt man einzelne Programmblocks mit 
Vielfachen von 18 oder 1888 und läßt viele Nummern 

frei (üblicherweise benutzt man erst nur volle Zehner), 
damit man später noch Einfügungen machen kann. Niedrige 
Nummern zu verwenden, bringt keine Vorteile (außer beim 
Tippen): Der Speicherplatz ist für jede Zeilennummer 
genau zwei Bytes lang (auch wenn im Reference Guide das 
Gegenteil steht); lediglich in den GOTO- oder GOSUB-Anwei- 
sungen sparen Sie das eine oder andere Byte. 

Man kann sich viel Arbeit (und Tippfehler) ersparen, wenn 
man sich klarmacht, daß die RETURN-Taste alles, was auf 
dem Bildschirm steht und wie eine Programmzeile aussieht 
(d.h. mit einer Zeilennummer beginnt), als Programmzeile 
einliest, wenn der Cursor sich in ihr befindet. Das bedeu- 
tet auch, daß der Cursor nicht erst an das Ende wandern 
muß. Sie können auch eine Zeile, die aufgrund einer Aus- 
listung auf dem Bildschirm steht, beliebig überschreiben 
und in der geänderten Form mit der RETURN-Taste eingeben. 
Ist dabei die Zeilennummer gleichgeblieben, so ist die 
alte Form dieser Zeile durch die neue ersetzt worden. 

Sie können aber auch die Zeilennummer (oder nur diese) 
ändern: Dann bleibt die alte Zeile erhalten, die mit der 
neuen Nummer kommt neu hinzu oder wird geändert. Diese 
Tricks (die z.T. nur bei Commodore möglich sind) sind 
insbesondere dann bequem, wenn im Programm viele fast 
gleichlautende Zeilen vorkommen oder wenn Sie einige 


Zeilen verlagern wollen. 


ilennonrmmern und Edit LlenH-tr-ıiıck 


— 
Puugte, 
—" 


25 


HHHRALTEH ZUPm >S5SEHFASSEH 


Fin3a3abev mit. INPUT 


Format: INPUT a 
INPUT t;a 
mit Variable a oder Variablenliste a (worin Kommata 


zwischen den einzelnen Variablen stehen) 
Fragetext t (dieser darf maximal 20 Zeichen lang sein) 


Beispiele: INPUT "ZAHL DER SPIELER ";Z 
INPUT "REIBUNG J/N "5R$ 
INPUT "ANFz=KOORDEX, N 735%,7 
INPUT "ANF.-KOORD.X,Y "3X(J),Y(J) 


Die Anweisung INPUT enthält also wahlweise einen Fragetext, 
der durch ein Semikolon von der folgenden Variablen(-Jliste) 
getrennt wird. Die Ausführung geht so vor sich: Das laufende 
Programm unterbricht sich und schreibt den Fragetext (falls 
vorhanden) auf den Bildschirm, auf jeden Fall aber ein Frage- 
zeichen. Dahinter blinkt dann der Cursor: Der Computer ver- 
langt nach einer Antwort und wartet darauf. Der Benutzer 

muß nun eine Zahl oder einen Text oder deren mehrere, und 
zwar passend zu der Variablenliste der Anweisung, eintippen; 
wenn es mehrere sind, werden sie durch Kommata getrennt. 

Noch sind mit DEL Korrekturen möglich. Die Eingabe wird 
abgeschlossen mit dem Drücken der Return-Taste: Nun wird 

der Brief sozusagen eingeworfen. Sie können auch nach jeder 
Einzeleingabe die Returntaste drücken; ein doppeltes Frage- 
zeichen weist dann darauf hin, daß noch etwas fehlt. Zahlen 
können mit E geschrieben werden (z.B. 3.5E-7), es können 

aber keine Ausdrücke (wie 3*4+7) eingegeben werden. Texte 

aus Buchstaben, Ziffern und gewissen einfachen Zeichen kann 
man ohne Gänsefüßchen eingeben, anders ist es z.B. bei vor- 
oder nachlaufenden Leertasten oder zum Text gehörenden Konm- 
mata. - Wenn Sie Programme von anderen Rechnern auf den VC 20 
übertragen, bekommen Sie leicht Fehlermeldungen, wenn die 
Fragetexte zu lang sind; sie müssen jeweils am Ende der Bild- 


schirmzeile enden, und das ist beim VC 20 schon sehr früh |! 


Wenn Sie trotzdem gerne ausführliche Fragen stellen wollen, 
so empfiehlt sich eine PRINT-Anweisung für den Anfangsteil 
der Frage. Übrigens macht es sich gut, wenn ein Fragetext 
auf dem Bildschirm mit Leerzeilen abgesetzt ist. Das geht 

am einfachsten mit einem programmierten Cursor am Anfang des 


Textes in der INPUT-Anweisung. 


Beachten Sie bitte, daß INPUT im Grafikmodus nicht ohne weiteres 
möglich ist. Sollen Werte in einem Grafikprogramm mit INPUT 
eingegeben werden, so geschieht das am besten vor dem Ein- 
schalten von GRAPHIC 2 (oder 1] oder 3); im laufenden Gra- 
fikprogramm (d.h. danach) weicht man am besten auf andere 


Fingabetechniken aus. 


INPUT ist ein relativ umfangreicher und komplexer Befehl; 
er gestattet die Eingabe von Inhalten aus mehreren Zeichen, 
schreibt vorher den Fragetext und weist die Antworten den 
Variablen als (neue) Werte zu. Nachteilig ist mitunter, daß 
er mit einer Programmunterbrechung einhergeht. Man braucht 
daher auch noch andere Arten, Eingaben über die Tastatur zu 
machen, die ohne Unterbrechung möglich sind. 


GAHzZ IN “ORVNEERGEHEH 


E13 male mit KET 


Format: GET a 
mit Variable a (String meist günstiger als Zahl) 


Wird eine Taste (evtl. zusammen mit Shift- oder Commodore- 
Taste C=) gedrückt, so wird die zugehörige Kennzahl (ein 
Byte, also eine Zahl von Q bis 255) in einen Zwischenspeicher 
(Tastaturpuffer) gesetzt, falls dieser nicht schon vol] ist - 
er faßt 10 Zahlen. Wird die Anweisung GET ausgeführt, so 
greift sich der Computer das älteste Zeichen aus dem Puffer 
und weist es der Variablen a zu. Ist a eine Stringvariable 
(z.B. B$), so hat es nun den Inhalt, der sonst beim Drücken 
der Taste(nkombination) geschrieben worden wäre. Ist a aber 
eine Zahlenvariable, so erhält sie bei den Ziffern 1] bis 9 
diese Zahlen als Werte, sonst aber stets die 9, auch wenn 
überhaupt keine Taste gedrückt worden war. Das Programm 

wird dabei keineswegs unterbrochen, vielmehr schaut GET 
sozusagen im Vorbeigehen im Briefkasten nach. 


Soll auf eine Eingabe gewartet werden, so muß man das etwa 
so formulieren: 

1@ GET A$: IF A$="" THEN 18 

20 A=VAL(A$) 
"" ist dabei ein String der Länge Null, im Gegensatz zur 
Leertaste " ". Jetzt wartet das Programm gewissermaßen am 
Briefkasten, bis etwas eingeworfen wird. Anders als bei 
INPUT besteht diese Eingabe aber nur aus einem einzigen 
Zeichen oder im Rahmen einer FOR...NEXT-Schleife aus einer 
gegebenen Anzahl von Zeichen. Natürlich kann man sich mit 
GET und anderen Anweisungen eine komplette INPUT-Prozedur 
zusammenbauen; das ist insbesondere bei der Grafik des 


Super-Expanders interessant. 


Oft ist es nötig, den Tastaturpuffer rechtzeitig zu leeren: 
38 FOR I=1 TO 18:GETL$:NEXT 
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Oder wir erzählen dem Computer einfach, sein Tastaturspeicher 
wäre leer (obwohl das eigentlich gar nicht stimmt): 

POKE 198,0 
GET hat den Vorteil, daß das Programm zu dieser Eingabe 
nicht unterbrochen werden muß; nachteilig ist gelegentlich, 
daß ohne weiteres nur ein Zeichen eingegeben werden kann. 


Daß jeder Tastendruck nur einmal mit GET erwischt wird, 
GET also auf Dauerdruck nicht mehrfach reagiert (in einer 
Schleife), und daß es auch noch evtl. mit Verspätung statt- 
findet (wegen des Tastaturpuffers), kann erwünscht sein, 
muB es aber nicht. In diesem Beispiel: 

18 GET A: IF A=7 THEN PRINT 7 

28 FOR I=8 TO 5AB9:NEXT:GOTO 19 
wird z.B. die Zahl 7 fünfmal geschrieben, wenn man die 
Taste 7 fünfmal nacheinander drückt. Wegen der Pausenschleife 
kann das Schreiben mit einiger Verzögerung geschehen. 


Falls Sie (z.B. bei einem Klavierspielprogramm) nicht wünschen, 
daß sehr schnell gedrückte Tastenfolgen nachgearbeitet werden, 
können Sie den Tastaturpuffer begrenzen, sinnvollerweise 
meistens auf ] (statt der normalen 198, auf jeden Fall aber 
nicht über 19 hinaus): 


POKE 649,1 
TFISTEH Al3 KLINGSELKHÜPFE 
Ta=tatunr saefmamen mit FEEH 


Oft will man aber eine Anweisung genau so lange wiederholt 
ausführen lassen, wie man eine bestimmte Taste drückt. 
Dazu eignet sich der Speicherplatz 293. In ihm befindet 
sich normalerweise die Zahl 64. Während des Druckes auf 
eine bestimmte Taste ist der Inhalt dieses Speichers eine 
für die jeweilige Taste kennzeichnende Zahl (unabhängig von 
SHIFT usw.). Mit dem Kurzprogramm 
18 PRINT PEEK(283):G0T0 19 
kann man sich ein Verzeichnis anlegen. Natürlich hat auch 
der Computer dieses Verzeichnis: es beginnt bei Speicherplatz 
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60518. Ein Hupen-Programm kann etwa so aussehen: 
28 IF CHR$S(PEEK(6@51Q@+PEEK(203)))="K" THEN F=209 
30 SOUND 0,9,0,F,8: F=98:6G0T0 2d 


Die SHIFT-LOCK-Taste ist die einzige einrastende Taste; man 
kann sie z.B. benutzen, um ein Programm vorübergehend zu 
verlangsamen, indem man in eine Schleife einbaut: 

378 IF PEEK(653)=1 THEN FOR I=ß TO 189:NEXT 
Man kann es auch anhalten und durch Ausrasten wieder 
weiterlaufen lassen: 

460 IF PEEK(653)=1]1 THEN 468 


Bei Spielen für zwei Personen mit Tasten führt die normale 
Tastenabfrage mit GET und mit PEEK(293) dazu, daß die 
Partner sich gegenseitig behindern können bzw. daß sie 

sogar unterschiedlich gut "zum Zuge kommen" (da beim gleich- 
zeitigen Drücken mehrerer Tasten immer die gleichen den 
Vorrang haben). Hier kann man der einen Person Tasten 

für PEEK(283) und der anderen die für PEEK(653) zuweisen; 
sie können sich dann nicht gegenseitig behindern, auch wenn 


sie überhaupt nicht mehr loslassen. 


Der Speicherplatz 653 achtet sozusagen auf die drei Um- 
schalttasten SHIFT (ebenso SHIFT LOCK), C= und CTRL: Er 
enthält bei SHIFT oder SHIFT LOCK eine ], bei C= eine 2, 

bei CTRL eine 4 und beim gleichzeitigen Drücken von mehreren 
dieser drei die entsprechende Summe (oder, was dasselbe ist, 
aber den Ursachen näher kommt: das logische ODER von den 


Zahlen). Die Codierung der Tastatur sieht nun so aus: 


EiIHO r 
se 57 58 59 1 60 61 6 3 
a RES 
9 15 r 59 1 51 12 52 13 n 
stı . 
4 > 20 ha 21 45 22 46 
N - f7 
33 28 36 36 z 63 


Leertaste 32 keine Taste 64 


Die unterstrichenen Zahlen bedeuten den Inhalt von 











Speicherplatz 653, die anderen den von 283 oder 197. 
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HICHT HUR TEHHIS 


=ıarınth- Pacdodles 


MM 


Potent ii ometer-, « 


An den VC 20 kann man zwei externe Drehwiderstände an- 
schließen, die Paddles heißen, vermutlich als scherzhafte 
Bezeichnung für die Tennisschläger bei der ersten Generation 
der Telespiele. Ihre Stellungen werden analog-digital um- 
gewandelt und erscheinen als Zahlen von @ bis 255 in den 
beiden Speicherplätzen 36872 und 36873. Ist der Super- 
Expander angeschlossen, kann man sie auch mit RPOT(®) und 
RPOT(1) abfragen. Jedes Paddle hat auch noch einen roten 
Knopf, der wie ein Klingelknopf funktioniert und genauso 


angeschlossen ist wie jeweils ein Schalter des Joystick 

und darum auch genau so abgefragt werden muß: Der rote 

Knopf am Paddle Nr. 8 ist identisch mit der Stellung "Links" 
des Joysticks (also ist RJOY(@) dann 4), der am Paddle Nr.] 
entspricht der Richtung "Rechts" und damit dem Wert 8 

von RJOY(8); ohne Super-Expander ist der letztere etwas 
umständlich abzufragen; vgl. nächsten Abschnitt. 


Abgesehen von den Endbereichen ordnet der Computer den ein- 
gestellten Winkeln an den Paddle-Drehknöpfen Zahlen zu, und 
zwar (leider) von rechts nach links @ bis 255 (also 98 ver- 
schiedene, die Auflösung ist also 8 bit). Wenn Sie lieber 
die großen Zahlen bei der Drehung nach rechts haben wollen 
(wie z.B. beim Lautstärkeknopf eines Radios),verwenden Sie 
z.B. 255-RPOT(@), und wenn Sie Zahlen von @ bis 1 wünschen, 
nehmen Sie (1-RPOT(8)/255). Die natürlichste Verwendung 
der Paddles besteht wohl darin, daß man in einem laufenden 
Programm, das einen Vorgang simuliert, eine Größe mit der 
Hand verstellt, die man auch in der Wirklichkeit an einem 
Drenknopf einstellt oder zumindest an einem stufenlosen 
Stellhebel (Gaspedal, Lenkrad, Lautstärke, Soll-Temperatur 
etc.). 


Wenn Sie ein Programm haben, das gewisse mathematische Opera- 
tionen mit vorgegebenen Funktionen vornimmt (Aufsummieren, 
Steigung bestimmen, durch Potenzreihen oder Fourier-Reihen 
annähern o.ä.), so haben Sie mit den Paddles eine Möglichkeit, 
anstelle von formelmäßig bestimmten Funktionen auch ganz will- 
kürliche einzugeben, ohne daß Sie dabei Hunderte von Zahlen 
eintippen müßten: Lassen Sie in einer FOR-NEXT-Schleife oder 
einer mit GOTO geschlossenen Schleife X durch die natürlichen 
Zahlen bis zu einem oberen Ende XM laufen und weisen Sie 

dabei der Funktion Y(X) einen vom Paddle bestimmten Wert zu, 
z.R. Y(X)=1823-4*RPOT(O). Damit das Ganze nicht zu schnell 
geht, können Sie noch eine kurze Pausenschleife FOR J=8 TO 
3@ß@:NEXT einbauen; Sie können aber auch das Fortschreiten 

von X vom Drücken eines Feuerknopfes abhängig machen: 


n IF RJOY(d)=W THEN n (mit der Zeilennummer n) 
So können Sie bei der Eingabe der Funktion beliebige Pausen 
machen und dabei auch weite senkrechte Sprünge einbauen. 
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1658 REM MIT PADDLES UND SUFEFEAFPAHNDER 

161 : 

184 REM TREHEN SIE All FADIDLE HR.@ UHD DEUECKEH 
155 REM SIE ZEITMEISE DABEI DEH FEUEREHOPF NR. 
186 : 

118 GEAPHIC 2 

124 DIM YeIS9:A=3 

135 Y=125-REPÜOT«CO) 

148 POINT 2.#.150-' 

1568 FOR J=a TO SEC: HEAT 

PAIIHT 9,#%,154-'r 


TI 
_ 
and 


ß 
5 


War+s. 4: I=1+l 
3a IF I-16a THEH 130 

243 GET WE:IF We="@" THEN:GRAPHIC 4: RUN 
259 GOTO 248 


1E&% 

178 IF RJOWCRI=G THEN 220 

128 IF I=& THEN 220 

199 WELD=WDRAM 2,4, 158 TO %,1SO-WCT) 

288 D=YEIS-YEI-1D:DRAM 2,%,580 TO, Sad-D 
218 S=SHCII DRAN 28,508 TO X, 809-5100 
228 


Dieses kleine Programm zeichnet eine willkürliche Kurve, 
während Sie den Feuerknopf Nr.@ß drücken. Die Höhe des jeweils 
neu hinzukommenden Punktes können Sie durch Drehen am Paddle 
Nr.d bestimmen und zugleich auf dem Bildschirm beobachten. 
Das Programm zeichnet auch gleichzeitig ein Steigungshisto- 
gramm (also eine Annäherung an die "Ableitung" der Differen- 
tialrechnung) und ein Summen-Histogramm (eine Annäherung an 
das Integral). Außerdem hält es die 160 eingegebenen Funktions- 
werte in einer indizierten Variablen Y(I) fest (was innerhalb 
des Beispiels nicht nötig wäre): Man kann also in zusätzli- 
chen Programmteilen rechnerisch auf alle 160 Werte zugreifen 
(z.B. die Kurve durch Potenzreihen oder Fourier-Reihen dar- 


stellen). 
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DAS VERGHLDSLINAGSSSTEUFR 


wi a RT or nut Sn H. i 2" Hr 


Mit dem Joystick kann man dem VC 20 mitteilen, welche von 
acht Himmelsrichtungen man wählen möchte, indem man einen 
Hebel einfach in die entsprechende Richtung drückt. Inwendig 
sind vier Kontakte, von denen maximal zwei benachbarte mit 
einem in der Mitte sitzenden verbunden werden. Außerdem 

gibt es noch einen roten Klingelknopf (FIRE BUTTON). 


Nehmen wir zunächst einmal an, wir haben einen Superexpander 
angeschlossen (was die Sache wesentlich vereinfacht): 
18 PRINT RYOY(8):GOTO 19 


Probieren Sie alle Zustände aus; der rote Knopf liefert 128, 


die Stellungen des Steuerknüppels je nach Richtung: 


rechts 





unten 
In Binärzahlen erkennt man darin ein nützliches Schema: 
aıoı B201 10901 
Bıoe Bodo 100D0 
Bıla Bald 19210 
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Die vier Bits bedeuten nämlich von links nach rechts: 


Rechts) Links] Unten| Oben 
8 4 2 1 


Wenn Ihnen AND vertraut ist, können Sie das zu einer bequemen 

Abfrage der Richtungsanteile nutzen: Die Bedingung IF(RJOY(B) 

AND 4)=4 ist genau dann erfüllt, wenn eine der drei nach links 
weisenden Richtungen (links oben, links oder links unten) ge- 

drückt ist (es geht sogar schon mit IF RJOY(@) AND 4 THEN Seh 
Die 128 vom Klingelknopf kann ebenfalls mit AND herausgefischt 
werden, wenn noch gleichzeitig eine Richtung gedrückt wird. 


Die d als Argument von RJOY() ist übrigens genauso nötig 
und nichtssagend wie das Wort "Es" in dem Satz "Es regnet" 
(Sieg der Grammatik über die Informatik); immerhin darf 
man statt der ®Ö auch etwas anderes nehmen. 


Was macht man nun, wenn man keinen Superexpander hat und 
trotzdem Freude am Joystick haben möchte ? Man kann den 
Speicherplatz 37137 abfragen: 

18 PRINT PEEK(37137):G0T0 18 
Sie werden dann feststellen, daß dieser Platz auf alles 
außer auf die Richtungskomponente "Rechts" reagiert. 
Subtrahieren Sie die Anzeige von der Zahl 126, so erhalten 
Sie in den übrigen Fällen stets das Vierfache unserer 
Tabelle; beim Klingelknopf allerdings nicht 128, sondern 
8 (d.h. zunächst 96, also 32 weniger als 126). 


An die Information, ob der Joystick in eine der rechten 
Richtungen gedrückt ist, kommt der Computer nur mit einigen 
Ösen. Es muß nämlich erst sozusagen eine Einbahnstraße für 
Daten umgedreht werden: 
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Id POKE 37154,127 
Dann muß abgefragt werden, ob in 37152 das höchste Bit 
gesetzt ist: PRINT PEEK(37152)AND128; anschließend muß 
aber die Umschaltung wieder rückgängig gemacht werden, weil 
sonst nicht mehr alle Tasten ansprechbar sind: POKE 37154,255. 


Die roten Knöpfe an den Paddles sind genau so angeschlossen 

und müssen daher genau so (mit oder ohne Super-Expander) 
abgefragt werden wie die Richtungen Links und Rechts am 
Joystick, im letzteren Falle also auch wieder so umständlich. 
Wenn Sie einen Joystick benutzen wollen und keinen Super- 
Expander haben, können Sie auch die Drahtanschlüsse im Joystick 
umstecken: "Rechts" und "Klingelknopf" vertauschen: Sie können 
dann alle Richtungen mit PEEK(37137) abfragen, ohne den 
Speicherplatz 37154 hin- und herzuschalten. 


STAPFPELWEISE IATEH 


FEFEHRD und IHTn 


Format: DATA d oder DATA d],d2,d3 etc. 
READ v oder READ v1,v2,v3 etc. (meist jedoch 
als indizierte Variable in FOR-NEXT-Schleife) 


Dieses Anweisungspaar gehört zu den entbehrlichen, aber oft 
bequemen. Wenn vielen Variablen schon vom Programm her be- 
stimmte Werte (Zahlen oder Strings, d.h. Texte) zugewie- 
sen werden sollen, so ist das mit der Wertzuweisung (wie: 
A(1)=7:A(2)=13 usw.) möglich, aber umständlich. Hier kann 
man READ und DATA einsetzen. Die Daten werden einfach der 
Reihe nach in DATA-Zeilen geschrieben,jeweils durch Kommata 
getrennt (aber nicht vor dem ersten und nicht nach dem 


letzten Datum einer DATA-Anweisung !). Stringvariable mit 
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unevled. 





vor- oder nachlaufenden Leertasten oder mit Sonderzeichen 
müssen in Gänsefüßchen " " eingebettet werden (die dann 
nicht zum jeweiligen String gehören !). Soll in einem 
String ein Komma vorkommen, muß das ganze String in " " 
gesetzt werden. 

Mit der READ-Anweisung werden nun die Daten der Reihe nach 
den Variablen zugewiesen. Auf die Reihenfolge hat der 
Programmierer aufzupassen. (Das ist besonders dann etwas 
kitzlig, wenn READ in Unterprogrammen vorkommt: Die DATA 
werden in der Reihenfolge genommen, in der sie im gesamten 
Programm stehen, die READ-Anweisungen werden natürlich in 
der Reihenfolge behandelt, die durch GOTO oder GOSUB be- 
einflußt wird; es hilft also nichts, jede DATA-Serie gleich 
vor oder hinter die zugehörige READ-Serie zu schreiben !) 
Auch muß der Programmierer dafür sorgen, daß die DATA 
nicht früher aufgebraucht sind als die READ-Anweisungen 
(Fehlermeldung: OUT OF DATA), und wenn hinter READ eine 
Zahlenvariable steht, muß auch das Datum, das an der Reihe 
ist, eine Zahl sein (z.B. 3.7E-24). 


Zur Verwendung der Anweisungen sol] hier ein kurzes Beispiel 
genügen, obwohl der Sinn der Sache erst bei längeren zum 


Vorschein kommt: 
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10 DATA ANTON,23,BERTA,18,CAESAR, 32 
28 FOR I=1 TO 3:READ N$CI),A(CI):NEXT 
NS(2) ist von jetzt an "BERTA", A(3) ist 32. 


Um aus einer langen Kette von Daten eins per Zufall auszu- 
wählen, kann man so vorgehen: 

18 DATA ...... 

28 Z=100*RND(@):FOR I=1 TO Z:READ A:NEXT 
Jetzt hat A einen der ersten 109 Werte, die hinter DATA 
eingegeben sind, bei jedem Lauf des Programms neu vom 
Zufall bestimmt. Dieses Verfahren braucht weniger Speicher- 
platz als eine Zuweisung aller 108 Werte an eine indizierte 
Variable, von der der Zufallsgenerator dann einen Index 
herauspickt. 


Hd HIH WIEDER “OH YOrRHE |! 
FESTORE 


FOrMat: RESTORE 


Sie können in einem Programm ganz verschiedene Daten per 
DATA zuweisen. Es kommt dabei nicht darauf an, ob die 
zugehörigen READ-Anweisungen gleich dahinter oder davor 
oder ganz woanders stehen, nur die Reihenfolge der Bearbei- 
tung der READ-Anweisungen muß mit der Reihenfolge der 
DATA-Anweisungen zusammenpassen. Der Rechner merkt sich 
mit einem "Zeiger", wie weit er die DATA aufgebraucht hat. 
Soll er ganz von vorne anfangen, so können Sie RESTORE 
eingeben: der Zeiger ist dann wieder auf Null. Wollen Sie 
auf ein Datenpaket mehrmals in einem Programm zugreifen 
(z.B. zusammen mit dem Zufallsgenerator), so stellen 

Sie diese Daten zweckmäßigerweise an den Anfang der DATA- 


Sammlungen und verwenden Sie vorher jeweils RESTORE. 
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Im LAUFE DER ZEIT 


Die Zeitvariable TI 


Was hat der VC 20 mit einer Armbanduhr gemeinsam ? Beide 
können die Zeit messen. Vom Einschalten des Gerätes an zählt 
eine spezielle Variable TI in jeder Sekunde um 60 Einheiten 
weiter, jedenfalls wenn nicht durch die Benutzung der Data- 
sette (des Cassettenrecorders also) Unordnung entsteht. Man 
kann also durch Abfragen von TI die Zeit auf 1/60 Sekunden 
genau erfahren, auch im Programm zwischen zwei Anweisungen. 
Geben Sie z.B. ein: 1®@ PRINT TI:GOTO 19 





Wenn man wissen will, wie lange eine Programmschleife 
dauert, kann man es etwa so machen: 
18 T2=T1:DT=(2-T1)/60:T1=T2 


98 GOTO 18 


In der Schleife hat DT dann den Zahlenwert der letzten 
Schleifendauer in Sekunden und steht für Rechnungen zur 
Vefügung (Achtung: ImerstenSchleifendurchlauf ist DT im 
allgemeinen viel zu groß; um das zu vermeiden, muß vor der 
Schleife einmal T]I=TI abgefragt werden). 
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Beachten Sie bitte, daß TI keine normale Variable ist; sie 
kann keinen Wert vom Programm her oder durch INPUT zugewiesen 
bekommen, sondern sie kann nur abgefragt werden, und sie 
ändert sich ganz von alleine. Die Variablen T2 und T] im 
vorigen Beispiel sind Ablesungen von TI zu bestimmten Zeit- 
punkten während der Programmausführung. 


MIHUTEHN UHD S5TUHNDEH 


Die Zeit .-ariable TIE 


TI durch 6@ teilen, geht ja noch an, die Umrechnung in 
Minuten und Stunden ist da schon etwas umständlicher. 
Zum Glück gibt es auch die String-Variable TI$, die ähnlich 
wie TI von selbst weiterläuft, aber auch gesetzt werden kann. 
Sie ist immer sechsstellig; die ersten beiden Stellen geben 
die Stunden an, die mittleren die Minuten, die letzten die 
Sekunden. Um dem VC 20 mitzuteilen, daß es 14 Uhr 23 min und 
48 Sekunden ist, schreibt man (ohne Zeilennummer): 
T1$="14234@" 
und drückt genau zur aufgeschriebenen Uhrzeit auf die 
RETURN-Taste. Machen Sie es mit der jetzigen Uhrzeit und 
geben Sie dann ein: 1® PRINT T1$:G0T0 18 


Wenn Sie mit LEFT$ und MID$ Stunden oder Minuten heraus- 
greifen und mit SOUND allerhand Lärm oder den Westminster- 
Schlag programmieren, können Sie eine Digitaluhr mit rege]- 
maßigem Gong oder Weckeinrichtung nachahmen, Mit der Grafik- 
anweisung DRAW können Sie auch eine richtige Analoguhr 
mit Stunden-,„Minuten- und Sekundenzeiger auf dem Bildschirm 
laufen lassen. Eigene Telespiele können Sie über die 
Spieldauer begrenzen: 

18 INPUT"SPIELDAUER IN MIN ";D:T1$="ddddgdg" 


ed IF VAL(MIDS(TI$,3,2))<=D THEN PRINT"GAME OVER":END 
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Eine hübsche Anwendung von TI ist die Messung der Reaktions- 


zeit: 


EEeN RERAKTIONSZEIT 


POKE 541 

FÜR I=3 TO 18824 1S9B5#RHIW 12 HEST 
PRIHT"8":T1=T1:GET A# 

BET A£:IF A$="" THEN 120 

Tz=TI:PRINT IMTEETZ-T1:#1880,’58:50T01195 


m mm Li 
lm zn 
di m 


Zeile 188 begrenzt den Tastaturpuffer auf eine Eingabe, die 
dann sicherheitshalber in Zeile 120 auch noch leer gemacht 
wird, damit niemand mogeln kann und zu frühes Drücken 
belohnt bekommt. 118 ist eine Pausenschleife von unge- 
wisser Länge. Nach dem Schreiben des vollen Kreises 

wartet der Rechner in Zeile 138 auf eine Reaktion der 
Versuchsperson. Leider ist das Ergebnis nur auf 1/60 
Sekunden genau, was bei Werten um 200 Millisekunden stört. 


BEFFREHAHS5SUHG DES EILD=SCHIFRMTZ 


„nit _ichtar- irffel und mit FDOOTen 


Der Bildschirm kann auf zwei ganz verschiedene Arten abge- 
fragt werden: Mit einem Lichtgriffel kann man auf die Front- 
fläche der Bildräöhre zeigen, und im Speicher, der für den 
Bildinhalt zuständig ist (meist der Zeichensatz im RAM), kann 
man nachsehen, welche Farbe ein bestimmter Punkt hat. 


Der Lichtgriffel stellt im Prinzip fest, wann die jeweilige 
Stelle des Bildschirms vom Elektronenstrahl getroffen wird. 


Da dieses zeilenweise ganz regelmäßig geschieht, kann daraus die 


4] 


Position bestimmt werden. Man kann auf diese Weise den Bild- 
schirm als Eingabekanal verwenden (Antippen eines bestimmten 
Feldes wird als Start eines Programmteiles vereinbart) oder 
direkt auf ihm zeichnen (das Programm muß dann die mit dem 
Lichtgriffel angesteuerten Punkte sozusagen von innen nach- 
malen (mit PCINT oder DRAN). 


Die Abfrage eines schon vorhandenen Bildes mit RDOT (oder 
einem selbstgeschriebenen Ersatz dafür aus PEEK-Anweisungen, 
je nach der Art der benutzten Grafik) liefert für jedes 
Koordinatenpaar, auf das sie angewendet wird, eine Aussage 
über die dort gesetzte Farbe, und zwar im Falle von RDOT() 
direkt als Codenummer der Farbe (nicht als Zeiger auf die 

4 vorgewählten Farben, was ja auch denkbar wäre: Wenn Sie 

also bei einem Programm die COLOR-Anweisung ändern, müssen 

Sie im allgemeinen auch die Zahlen , mit denen RDOT() ver- 
glichen werden sol], ändern). Rie RNOT-Abfrage ist natürlich 
im Prinzip nichts anderes als die Abfrage von (Zwischen-) 
Ergebnissen, die in einem Speicher abgelegt sind (obendrein 
noch relativ grob gerundet). Trotzdem kann man mit ihnen so 
arbeiten, als verwendete man grafische Methoden. Man kann 

z.B. den Schnittpunkt zweier Kurven auf dem Bildschirm suchen, 
indem man die eine punktweise (also z.B. mit POINT) zeichnet 
und dabei jedesmal mit RDOT() abfragt, ob die Farbe der 
anderen Kurve dabei "betreten" wird. So kann man etwa Geometrie 
betreiben, ohne daß Schnittpunkte koordinatenmäßig berechnet 
werden müssen; es wird zwar ungenauer, aber anschaulicher 
(allerdings geht es in den Unterprogrammen für das Linienziehen 
nicht ohne Koordinaten). 
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35 REM SCHHITTFÜHETE MIT EDOTE.> 
32 REN SUFER-E#AFÄHDER 

HE GEAFHIC 3:COLOR 1,714, 18 

LES REM ERSTE KUFWE 


118 FOR #=-3 TO 3 STEF „53 

129 Yaatz3/zrl. 2ZEH 12 -1.6 

= 23=5git+rssi: R 

140 Yr=-59d-74258 

158 IF "rd OR Tr>1a23 THEN »A=aa: Ast: GÖOTOITE 
1eft DREAH 3, HMR,YA TO HR, TTV IHASHR As 

ira HEAT 


REM ZEICHHEH MIT ABFREAGE 


FÜR #=-3 TO 3 STEP 5758 
Verf. 
KH=SOA+ HS 993,2 
zz Ea5-" \y: >54 
IF RDOTiH&. Pro=1g THEHN GOSUEB 469 
FOIHT 2, HR, "V 
HEAT 

>93 TO 1323.588 

An,zSa TO 539.1885 

3 TO 3:FOINT 1. 599+4453973., 4359: HE#T 

FOR 1 0 1:POINT 1,528, SBG-v#3aa.2 NEST 
GOTC 2338 


REM A EOÖOEDIHATEH-AUSGARE 

Be 5 EHAR 1.8. LEFTEESTERCHN. SE 

EHHR T.5.LEFTEÜSTEETS.S2: I=Itl:REGIOH 1d 
RETURN 


De Gr De Re Gh (I DW eo Gill tg 
GG GINGE AUT ED 
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Dieses Beispielprogramm zeigt auch, wie die Methode von 
der Punktauflösung abhängig ist: Wenn man durch hinrei- 
chend dichtes (und evt]. sogar besonders dickes) Linien- 
ziehen dafür sorgt, daß der Schnittpunkt nicht unerkannt 
bleibt, kann es zu einer mehrfachen Meldung des "gleichen" 
Schnittpunktes kommen. Das erinnert daran, daß die unend- 
lich feinen Punkte und Linien der Mathematik "nur" Idea- 
lisierungen realer Gegenstände sind: Der "Schnitt" von 
zwei Bleistiftstrichen besteht eben aus vielen einzelnen 


Punkten, auch wenn nur einer gemeint ist. 
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Wie Der ZLIFTML.L. EN SPIEL; E 


bla I 





Format: RND(8) oder RND(]1) 


Es gibt hauptsächlich zwei Fälle, in denen man zufällige 
Zahlen haben möchte: Zum einen, wenn zufällige Ereignisse 
(Glückspiele, Kernphysik, Genetik usw.) nachgeahmt werden 
sollen, zum anderen, wenn man die "Monte-Carlo-Methode" 

als mathematischen Trick verwendet. Statt alle Möglichkeiten 
durchzuprobieren, läßt man den Zufall entscheiden und wertet 
das Ergebnis statistisch aus. 


Nun ist alles im Computer genau geregelt, sogar die Rechen- 
fehler. Während ein Mensch auf einem Rechenschieber bei der 
gleichen Aufgabe immer etwas andere Abweichungen in der 
Ablesung macht, reproduziert der Rechner auch seine Fehler 
immer gleich. Es ist darum gar nicht einfach, wirklich 
zufällige Zahlen zu erzeugen. Der VC 20 bietet uns zwei 
Verfahren an, die unterschiedliche Nachteile haben und die 
man notfalls kombinieren muß. 
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Die Funktion RND(]) liefert jedesmal eine Zahl zwischen 9 
und I, ohne erkennbare Regel, also gewissermaßen zufällig. 
Es kommen auch alle kleinen Bereiche zwischen ® und ] recht 
genau gleich oft an die Reihe. Der Nachteil (der aber auch 
als Vorteil genutzt werden kann) ist: Nach dem Einschalten 
des Gerätes ist die erste dieser (Pseudo-)Zufallszahlen 
stets .185564816, die zweite immer .®8468986348 usw. Wenn 
man eine Monte-Carlo-Simulation mitsamt ihren Zufallszahlen 
wiederholen möchte, ist das günstig, ebenso, wenn man bei 
einem Glückspiel-Programm seine Mitmenschen betuppen will: 
Nach einigen Spielen (jeweils mit frisch eingeschaltetem 
Computer) kennt man die Reihenfolge der "gewürfelten" 
Zahlen. Andere Argumente als ] zwischen den Klammern von 
RND() ändern auch nichts, wenn sie positiv sind, wohl aber 


die d, der wir uns nun zuwenden: 


RND(8) wird zwar auch nach einem festen Schema gerechnet, 
aber es startet mit der internen Uhrzeit, also mit der Zeit 
zwischen Einschalten des Rechners und Bearbeitung der RND(B)- 
Funktion, die natürlich von der Zeit zwischen Einschalten und 
Starten des Programms abhängt und damit wirklich vom Zufall. 
RND(®) hat einen anderen Nachteil: Die Zahlen sind nicht 

so gleichmäßig im Intervall zwischen ® und ] verteilt. 
Solange man nur 6 oder 37 verschiedene Zahlen würfeln will, 
spielt das keine entscheidende Rolle, wohl aber bei der 
Multiplikation mit größeren Zahlen (z.B. Telefonnummern). 

Man kann sich notfalls damit helfen, daß man die Dezimal- 
Ziffern einzeln mit RND(ß) würfelt, wenn es auf eine genaue 
Gleichverteilung ankommt. Ein anderer Trick ist die Ver- 
wendung von RND(]) mit einem vorgeschalteten RND(B), das 

dann nicht weiterverwendet wird, aber als Ausgangsbasis 

für RND(1) dient und dieses damit "unberechenbar" macht, 

etwa so: 1@ A=RND(®):A=INT(1+6*RND(1)):PRINT A 


Diese Zeile liefert eine (ganze) Zufallszahl zwischen ] und 
6 (beide einschließlich), die man nicht vorhersagen kann. 
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Rechteckverteilungen 


Wie man Zufallszahlen macht, die gleichmäßig in ein beliebiges 
Intervall zwischen den Zahlen A und B fallen, ist nicht sehr 
schwer: 1® Z=A+(B-A)*RND(]) 
Sind A und B ganz und sollen auch nur ganze Zahlen getroffen 
werden (A und B beide einschließlich), so ist zu Setzen: 

18 Z=A+INT((B+1-A)*RND(1)) 


Fast beliebige Verteilungen 


Soll die Wahrscheinlichkeit nicht in einem Intervall gleich- 
mäßiq (konstant) sein, sondern irgendeiner vorgegebenen 
Funktion F(X) entsprechen, so kann man nach John von Neumann 
ein sehr listiges Verfahren verwenden. F(X) darf allerdings 
in dem behandelten Intervall nirgends unendlich werden (auch 
nicht negativ); es sei FM ein Wert, der nirgends überschritten 


wird. Wir nehmen für das Beispiel an, daß die Funktion der 
Betrag der Summe von Sinus und Cosinus sei, was sicher 
nirgends größer als 2 wird, und daß das Intervall von A bis 
B reiche: 

Id FM=2 

28 Z=A+(B-A)*RND(]) 

38 IF ABS(SIN(Z)+COS(Z))<FM*RND(1) THEN 28 

48 PRINT Z:GOTO 28 
Die ausgedruckten Werte von Z folgen nun der gewünschten 
Verteilung. Zur Begründung: Die Zeile 38 weist einen 
gewürfelten Wert für Z um so wahrscheinlicher ab, je 


kleiner die angestrebte Funktion an dieser Stelle ist. 


Falls Sie im Laufe eines Programmes bei jedem Lauf 
eine bestimmte Zufallsfolge haben wollen, die sich 
bei einer Wiederholung auch reproduziert (ohne daß der 


Rechner deswegen jedesmal ausgeschaltet werden muß), können 
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Sie die Ausgangsbasis für die mit RND(]) erzeugten Zufalls- 
zahlen in die Plätze 139 bis 143 hineinPOKEn. Das folgende 
Programm zeichnet für gleiche Eingaben (von zweistelligen 
Zahlen etwa) jeweils das gleiche "Zufallsbild": 


18 FÜR Isa TO d: INPUT A:PÜKE 139+1,A:HEAT 
e5 GERPHIC Z:PÜINT 9,9,8 

20 FOR I=8 TO 18 

43 TRAM 2 TO 1823#RKHDe13, 1823#ENDE1) CHEAT 


Mit RND(@) gibt es jedoch auch bei gleichen Eingaben jedes- 
mal ein anderes Bild. 

RND(1) ist also eine sehr streng festgelegte Sache. Zufällig 
ist daran nur soviel, daß man die Reihenfolge praktisch 

nur dann vorhersagen kann, wenn man sie schon einmal mit- 
geschrieben hat (etwa wie ein Telefonbuch, worin die Nummern 
zwar auch festliegen, aber im Gegensatz zu einer Logarithmen- 
tafel nicht ohne weiteres berechenbar sind). 


TUFALLSTRILD 





ee ee Ge er 
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„ ER RARR EEE I TUNHGS 
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In diesem Abschnitt geht es um die Schritte, die zwischen 
der Eingabe und der Ausgabe im Computer geschehen: 

Il. Rechnungen im üblichen Sinne (Arithmetik) 

2. Stringverarbeitung und Umwandlungen zwischen 

Strings und Zahlen 

Vergleichsoperationen 
Logische Verknüpfungen (Boole-Algebra) 
Sprünge, bedingte Anweisungen, Schleifen 


oa 0 2» ww 


direktes Lesen und Schreiben im Speicher 
(PEEK und POKE) 
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Formal könnte man diese Dinge auch aufteilen in Funktionen. 
Das sind Daten, die nach bestimmten Spielregeln aus anderen 
Daten gewonnen werden, hier speziell aus je einem Datum, 
z.B. SINC), RND() oder SGN()), Operationen (Verknüpfungen 
von mehreren Daten nach bestimmten Spielregeln, z.B. Addition 
oder logisches ODER) und Anweisungen (z.B. Wertzuweisung, 
Sprungbefehl usw.). Diese Unterscheidung ist aber mehr gram- 
matisch als inhaltlich gerechtfertigt: SGN( ) wird als 
Funktion geschrieben, die logische Verneinung NOT aber nicht. 
Sie werden sehen, daß selbst Dinge wie bedingte Sprünge (IF 
THEN) auf arithmetische Rechnungen zurückgeführt werden, 
obwohl sie so nahe an der Umgangssprache formuliert werden. 


DER OCT .: 


Ö 


4 Al: 


hi 


, FECHEHMAZTCHIHNE 


a 
Hr-itbhmetik 


Sie werden vielleicht verwundert sein, das Rechnen im übli- 
chen Sinne als eine von vielen verschiedenen Tätigkeiten 
Ihres "Rechners" genannt zu finden. Tatsächlich werden 
im Computer auch Dinge wie Musik oder Logik auf dem Wege 
der Rechnung behandelt. Der Vorrat an rechnerischen Symoolen 
ist in BASIC ausgesprochen bescheiden: es gibt: 
die Grundrechnungarten: + - * / {nur mit /, nie mit :) 
die Potenzierung 1 
die Quadratwurzel SQR() 
Logarithmus und Exponentialfunktion zur Basis e LOG() EXP() 
die Winkelfunktionen SIN() COS() TAN() im Bogenmaß, 
die Kreisfunktion arcustangens ATN() 
Absolutbetrag ABS() und Vorzeichen SGN() (mit den Werten 
-1,8 und ]) 
die Abrundungsfunktion INT(), die auf die nächste nicht 
größere ganze Zahl abrundet. 


Man kann damit aber eine Menge machen: der Cotangens ist 
natürlich 1/TAN(), der Logarithmus einer Zahl A zur Basis B 
ist LOG(A)/LOG(B), weitere Beispiele (vor allem arcussinus 
usw.) finden Sie im VC 20-Handbuch und natürlich in mathe- 
matischen Formelsammlungen. 


AFN 
un 


RE FF OEM EL ENT 


N. a pn m vd Fin nme a tnae vn 


BASIC ist in der Schreibweise der Grundrechnungsarten sehr 
nahe bei der üblichen Mathematik. Das gilt auch für die 

Regel, daß "Punktrechnung vor Strichrechnung geht", d.h. 

daß a’b+c als (a’b)+c und nicht als a-(b+c) gedeutet wird. Das 


ist für den Computer zwar komplizierter, kommt aber den Ge- 
wohnheiten, die wir aus der Mathematikstunde kennen, sehr 
entgegen. Wenn keine Klammern gesetzt sind, gilt folgende 
Rangfolge (von innen nach außen, also von eng nach weit 
bzw. von früh nach spät in der Ausführung): 

Funktionen wie SIN() oder SGN() usw. 


Minuszeichen als Vorzeichen 


innen 
früh 


Potenzierung 
* / (untereinander gleichberechtigt) 
+ - (Minus als Subtraktion, beide gleichberechtigt) 


en 
So nn 7 Nm 1 — 


Vergleiche = <= > (untereinander gleichber.) 
logische Verneinung NOT 

8. logische Konjunktion AND 

logische Adjunktion: (nichtausschließendes) OR 


außen 
spät 


9 
10. Wertzuweisung = (LET-Anweisung) 


Mit runden Klammern (auch mehrfach ineinander, es müssen 
alle wieder geschlossen werden) kann man jede andere Rang- 
folge im Einzelfall festlegen. Stoßen gleichberechtigte 
Operationen ohne Klammern aufeinander, so wird von links nach 
rechts gerechnet, also: 3/4*12 ist 9. 


Man sollte es mit den Klammern auch nicht übertreiben: 

das Stack (das ist ein Zählwerk, das unter anderem auch für 

Klammern zuständig ist) läuft sonst über. Es ist dann besser, 

Zwischenergebnisse als Variable einzuführen. Elegant, wenn 

auch nicht besonders übersichtlich ist es, die gleiche 

Variable der Reihe nach mit mehreren aufeinanderfolgenden 

Zwischenergebnissen zu füllen, übertriebenes Beispiel: 
A=RND(9):A=A*754:A=INT(A):A=A+323 

anstelle von A=INT(RND((8)*754+323). 
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Beachten Sie bitte bei der Verwendung der logischen Ver- 
knüpfungen mit Zahlen, daß das Gleichheitszeichen (und die 
anderen Vergleichsoperationen) enger binden als AND, OR oder 
NOT: 3=(7 AND 3) ist -] (weil zutreffend), 

3= 7 AND 3 ist dagegen @, weil 3=7 unwahr und ist 
und damit den Zahlenwert ® hat. - Der Sinn der Sache liegt 
natürlich darin, daß Formulierungen wie die folgende ohne 
Klammer geschrieben werden können: IF A=B AND C=7 THEN ..., 
was bedeutet: IF (A=B) AND (C=7) THEN ... und nicht: 
IF(A=(7 AND C))=7 THEN. Leertasten können solche Dinge zwar 
für Menschen übersichtlich machen, für den Rechner zählen aber 


allein die vereinbarten Prioritäten und die Klammern. 


Beachten Sie bitte die unterschiedliche Priorität des 
Gleichheitszeichens (das in BASIC leider doppelt belegt ist). 
Als Wertzuweisung bindet es weniger eng als in Vergleichen: 
Nach der Wertzuweisung A=3 AND 6 ist A=2; die Bedingung 

A=3 AND 6 (etwa nach IF) hat für A=@ den Wert 8. 


L-i E Fr T Pa 1 L-J FE I ı I_I 15 


nit = und mit aoelernr ober LET 
Format: b=a oder LET b=a 
mit: Variable b und berechenbarem Ausdruck oder String a 


Es gehört zu den größten Handicaps von BASIC, daß die Wert- 
zuweisung mit dem symmetrischen Gleichheitszeichen geschrieben 
wird, obwohl beide Seiten denkbar verschiedene Bedeutungen 
haben: links steht eine Variable, die einen (neuen) Wert be- 
kommen soll, rechts steht dieser Wert (evtl. auch ein Ausdruck, 
der erst berechnet werden muß). In der Zuweisung A= A+B wird 
der Wert von A um den Wert B erhöht. Bei der Berechnung von 
A+B wird nämlich der alte Wert verwendet; nach der Ausführung 
der Anweisung hat die gleiche Variable A den neuen Wert. Sie 
sehen hier ganz deutlich, wie sehr es in BASIC auf die Reihen- 
folge von Anweisungen ankommt: A=B:B=A setzt beide Variablen 
auf den alten Wert von B, B=A:A=B umgekehrt auf den alten 
Wert von A. 
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Was auf dem Bildschirm völlig gleich aussieht, nämlich wie 
eine Zahl, kann intern ganz verschieden gespeichert sein: 
als Zahl oder als String. Mit beiden Formen kann man ganz 
verschiedene Dinge tun: An das String 12.854 kann man zum 
Beispiel vorlaufende Nullen anfügen oder hinten zwei Stellen 
abschneiden, mit der Zahl 12.854 hingegen kann der VC 29 
rechnen. Zur Umwandlung zwischen beiden Formen gibt es die 
Funktionen STR$() und VAL(). Die erstere verwandelt eine 
Zahl in eine Zeichenkette, z.B. ist STR$S(A) das String| 37 
wenn A zur Zeit gerade den Wert 37 hat. Denken. Sie bitte 
daran, daß Zahlen ja im VC 28 nicht in Dezimalziffern, son- 
dern binär gespeichert sind. Bei einer positiven Zahl er- 
scheint nach der Umwandlung in ein String links ein Leer- 


zeichen anstelle des unterdrückten positiven Vorzeichens |! 


VAL() ist umgekehrt eine Funktion, die man auf Strings an- 

wendet und die vom linken Ende an eine Zahl darin zu erken- 
nen sucht. Dabei wird ein E in der Exponentialschreibweise 

richtig erkannt. Beispiele: 





A$ 
"354 AEPFEL UND 54 BIRNEN" 354 
"2.B76E-23 METER" 2.076E-23 
"F=3.7 NEWTON" d 


Im direkten Zugriff auf ein String muß dieses in Gänse- 
füßchen gesetzt werden: VAL("3 ORANGEN") gibt 3, VAL(3 ORANGEN) 


ist dagegen nicht zulässig (Type mismatch error). 


an 
rD 
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= tr ii ma Werbet Linn Oo mt + 
Format: tI+t2 oder t1l+t2+t3 etc. 
mit Strings t] und t2 etc. 


Strings kann man aneinanderhängen mit dem Zeichen +, z.B.: 
1d DATA OBER,KREIS,TIER,ARZT 
28 FOR I=8 TO 3:READ A$(I):NEXT 
38 FOR I=@ TO 3:B$=B$+A$(I):NEXT 
48 PRINT B$ 
n$ ist vor diesem Programm (hoffentlich,d.h. wenn nichts 
anderes programmiert ist) das leere String "". Es wird also 
gedruckt: OBERKREISTIERARZT. Wenn Sie versehentlich die 
Zeile 30 so schreiben: FOR I=d TO 3:B$=A$(I)+B$:NEXT, 
so erhalten Sie jedoch ARZTTIERKREISOBER 


ID2H5 MASSERHD 
ıLEH«GN 


Format: LEN(t) 

mit String t, das Ergebnis ist eine nichtnegative ganze 
Zahl 

Wenn A$ z.ß. den Inhalt "DIES IST EIN TEXT" hat, so ist 

LEN(A$) die Zahl 17. MID$(A$,LEN(A$)-2,2) ist dann das 

Stück "EX". Zählen Sie es bitte nach und lassen Sie es den 

VC 20 auch nachzählen. 
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LEFT$ MiD$ RIEnT£ 


“OH KOFFEH UHD SCHAAHNZEH 
_EFTELID. FIGHTEC5 und MIDEENn 


Format: LEFT$(t,a) RIGHT$(t,a) MID$(t,n,a) 
mit String t, Länge a des Teilstücks, Anfangsstelle n 


Beispiele: A$="DIES IST EIN TEXT" 
PRINT LEFT$(A$,3) 


Sie erhalten die Antwort: DIE 
Bei PRINT RIGHT$(A$,6) bekommen Sie: N TEXT, 
bei MID$(A$,8,4) schließlich: TEI 


Und wenn Sie das 2. und 3. Zeichen von rechts haben wollen, 
aber nicht im voraus wissen, wie lang das String ist ? 
Dafür gibt es MID$(A$,LEN(A$)-2,2) 


tl Fi MR eh IMHO EILEFRHTEH 


lee Lich Yaıvııd Ideen 0 mIt >= 


Format: t]l=t2 t1>t2 tl<t2 
mit Strings t],t2,t3 
das Ergebnis ist ® für unwahr oder -] für wahr. 


Mit dem Gleichheitszeichen = kann man Strings auf Gleichheit 
prüfen, z.B. in einem Quizprogramm (die richtige Antwort 
sei R$): 
6@ PRINT"WER WAR DER ERFINDER DES PHONOGRAPHEN ": 
78 INPUT A$:R$="EDISON" 
80 IF A$=R$ THEN PRINT "RICHTIG":END 
98 PRINT "LEIDER NOCH NICHT GANZ RICHTIG !" 
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o& 
o© 
ELEFRN o 
2 > 
Was kann aber die Relation "größer" bzw. "kleiner" bei 


Strings bedeuten ? Man könnte vielleicht an die Länge 
denken, aber dafür haben wir ja die Funktion LEN. Es wird 
etwas viel Besseres bewirkt: eine alphabetische Sortierung, 
genauer: eine Vergleichsabfrage der ASCII-Code-Nummern der 
Anfangszeichen, und wenn die gleich sind, der zweiten 
Zeichen usw. Da die normalen Buchstaben aufeinanderfolgende 
ASCII-Nummern haben, bedeutet das gerade eine Abfrage der 
Reihenfolge in einem Lexikon. Ein kleines (nicht sehr 
elegantes) Alphabetisierprogramm, das N Wörter sortiert, 
geht etwa so: 


i 


IHFUT"AHZÄHL DER HOERTER ":H:DIM Ach) 
Für I=1i TO M:IHFUT AEUl2:HERAT 

FÜR I=1 TO HM:’FÖR I=s1 Toll 

IF AELTSLAFETN THEH ARE=hEiTı:Agi Tı=sAFeTsiH$ielıb=Hf 
HE#T:HEAT 

FR Isi TO H:FRINT Atil2:NEAT 


- 
— 


ID cn Fe co lm 
GIS Ka 


Es werden also alle Kombinationen darauf abgefragt, ob sie 
in der falschen Reihenfolge stehen; falls ja, werden sie 
umgedreht (wobei die Variable A$ als Zwischenspeicher nötig 


ist, weil sonst beide hinterher gleich wären). 
Daß man Zahlen ganz ähnlich nach ihrer Größe sortieren kann, 
versteht sich fast von selbst. 
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LG IT ZiIH Ci 7 


Er . . 
La vers a Hann 8m av Hi Mar am ahhle nm 


Daß 4 AND 6 als Ergebnis 4 hat, ist schon recht merkwürdig. 
Und fragen wir, was A=B sei, so erhalten wir die Antwort -|], 
wenn über A und B noch nichts bekannt ist, andernfalls aber 
auch eventuell eine 8. Das Ganze ist bei näherem Hinsehen 
sehr vernünftig und sogar sehr nützlich. 


Im vorigen Jahrhundert hat George Boole die Logik als eine 
Art Algebra betrieben mit Rechenregeln für wahre und falsche 
Aussagen. Man nennt darum Zahlen, die zwischen "wahr" und 
"falsch", W und F unterscheiden, Boole-sche Variable, 
meist ]1 und @, bei uns aber -] und ® (der Grund wird etwas 
später klar).Aussagen wie "A=B" oder "Heute ist Sonntag" 
sind manchmal wahr, manchmal auch falsch. Die Doppelaussage 
"A = B und heute ist Sonntag" kann auch wahr oder falsch sein, 
Hier gibt es aber eine einfache Regel: sie ist genau dann 
wahr, wenn beide Einzelaussagen (jede für sich) wahr ist, 
in allen anderen Fällen ist sie falsch. Allgemein: 

(W und Wisst W ICW und F)ist F 

(F und W)ist F - und F)ist F 
Wie steht es nun mit der Aussage "A=B oder heute ist Sonntag"? 
In der Umgangssprache ist nicht ganz klar, ob das auch wahr 
ist, wenn beide Einzelaussagen wahr sind. Die Logik hat darum 
zwei verschiedene Wörter für "oder", ein ausschließendes und 
ein normales (nicht-ausschließendes). In BASIC kommt nur das 
normale vor, es heißt dort OR, das ausschließende kommt in 
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einigen anderen Programmiersprachen, z.B. Assembler vor und 
heißt dort meist XOR). Eine Aussage mit dem (nicht-ausschlie- 
Benden) "oder" ist also immer dann wahr, wenn mindestens eine 
Teilaussage wahr ist: 

(W oder Wlist W |CW oder F)ist W 

(F oder WJist W |(F oder F)ist F 
Probieren Sie das mit ® und -] aus: 

PRINT B OR -] 
Der Computer antwortet: -1. Auf diese Weise können Sie alle 


8 Fälle aus den beiden Wahrheitstafeln (für AND und für OR) 

durchprobieren. Auch die Negation NOT ist sehr einfach: 
PRINT NOT ® 

Antwort: -], entsprechend umgekehrt. 


Wenn nun irgendeine Abfrage wie A=B oder A=<C vorkommt, wird 
daraus einer der beiden Wahrheitswerte ® (falsch) oder -] (wahr) 
gemacht, also eine Boole-sche Variable belegt. Sie können sich 
nun überlegen, wie eine Bedingung wie IF A=7 AND B<-3 THEN 
bearbeitet wird. 


Zur Sicherheit hier noch einmal die Wahrheitstafeln mit den 
Werten -] (wahr) und ® (falsch), wie sie in unserem BASIC 
auftreten: 


NOT 8 = -] 
NOT -1I1=98 





Damit ist noch nicht klar, warum die Wahrheit durch so eine 
seltsame Zahl wie -] dargestellt wird, und was es zu bedeuten 
hat, wenn man die Boole-schen Operationen AND, OR und NOT 
auf andere Zahlen anwendet. 


Dazu müssen wir uns die Binärdarstellung der Zahlen ansehen. 
Im Dezimalsystem haben wir 10 Ziffern und zählen: 
oe ı 23456789 


Nun sind alle verbraucht, und wir müssen zweistellig weiter- 
zählen: 180 11 12 usw. Die linke ] bedeutet darin etwas 
ganz anderes als eine rechts stehende, nämlich das Zehnfache. 
Die I in 108 bedeutet sogar noch einmal das Zehnfache davon 
usw. Aber wozu brä:cht man überhaupt 10 verschiedene Ziffern? 
Der Computer kommt mit 2 aus (die anderen hat er nur, damit 
wir seine Ergebnisse in unserer gewohnten Weise ablesen und 
unsere Eingaben machen können). Zählen wir also mit nur den 
beiden Ziffern ® und ]: ao 13 18 113 188 189 118 119 


In der "Binärzahl" 18 bedeutet die linke ] nun keineswegs das 
Zehnfache einer gewöhnlichen |], sondern nur das Zweifache, 
eine ]| an der dritten Stelle von rechts wieder davon das 
Doppelte, also eine Vier usw. 


Was machen wir nun mit den negativen Zahlen, also wenn es 

um Zahlen geht, die noch kleiner als 9 sind ? Die Schul- 
mathematik setzt die Folge ...3 2 1 @ fort mit -1 -2 -3 usw. 
oder die Folge 0,03 0,02 0,01 O mit -0,01 -0,02 usw. 

Das hat zwei Nachteile: Im Gegensatz zu allen anderen Zahlen 
fällt die Null mit ihrem Gegenstück zusammen, und die Rechen- 
regeln sind durchaus nicht besonders einfach. 


Betrachten wir nun ein Zählwerk, wie es z.B. am Kilometer- 
zähler von Fahrzeugen oder auf Verbrauchszählern für Energie, 
Gas oder Wasser vorkommt: Jedes Rad bedeutet eine Dezimal- 
stelle und trägt die Ziffern von O bis 9. Löst im Anzei- 
gefeld die 0 die 9 ab, wo wird die nächst-"höhere" Scheibe 
um eine Ziffer erhöht (in der Sprache des Kopfrechnens: Ad- 
dition von Eins mit Übertrag, "Eins im Sinn"). Nun kann man 
ein Zählwerk auch rückwärts laufen lassen (die vorhin genann- 
ten Geräte lassen das leider nicht zu, es sei denn gewaltsam 
und mit betrügerischer Absicht). Löst nun die 9 die O im 
Anzeigefeld ab, so geht die nächst-"höhere" Scheibe um eine 
Ziffer rückwärts, und wenn die dabei von O auf 9 wechselt, 
die nächste auch noch usw. Bei einem sechsstelligen Dezimal- 
zählwerk sieht das Rückwärtslaufen dann so aus: 

000003 

000002 

00000] 

000000 

999999 

999998 

999997 usw. 


Sie können sich leicht überlegen, daß die Rechenregeln für 
die Addition und die Subtraktion mit dieser Schreibweise viel 
leichter sind als bei der Vorzeichenschreibweise. Der einzige 
Nachteil ist, daß man sich bei den negativen links unendlich 
viele Neunen denken muß, genau so wie es bei den positiven 
dort unendlich viele Nullen gibt. Man könnte die unendlich 
vielen Neunen symbolisch als 9 schreiben (analog zu der 3 in 
1/3 = 0,3, die unendlich viele Dreien bedeutet). Daß man die 
unendlich vielen Nullen bei den normalen Zahlen einfach weg- 
lassen kann, liegt daran, daß es bei der gewöhnlichen Schrei- 
bung eindeutig ist, daß Leerstellen links Nullen bedeuten. 


N 
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Bei einem Zählwerk ist nun die Anzahl der Stellen begrenzt, 
bei den Zahlen im Computer ebenfalls. Soll man nun 999993 
als eine Zahl auffassen, die knapp unter der Q liegt (also 
= -7 ist), oder als eine Zahl knapp unter einer Million ? 
Bei dem Zählwerk ist das eine offene Frage (falls es eins 
ist, das auch rückwärts laufen kann), und beim Computer muß 
das festgelegt werden. Wenn man es mit negativen und positiven 
Zahlen gleichermaßen zu tun hat, ist es beim Dezimalsystem 
sinnvoll, den Bereich zu halbieren: Ist die höchste Ziffer 
(also die ganz links stehende) eine von O bis 4, so soll die 
positive gemeint sein, ist es eine von 5 bis 9, die negative. 
Die Schreibweise mit Vorzeichen erhält man daraus, indem man 
I Million (bei sechsstelligen Zahlen) abzieht: 

999994 wäre dann die vorzeichenlose Schreibweise 

von = 


Nun wenden wir uns wieder den Binärzahlen zu und zählen von 
3 an 16-stellig rückwärts: 


Danenngnnangdanı] = dezimal 3 
Donnnnnnddnnddld 2 
nononnnnndnnddn 1 
DEnnnaDDDndnnnnn 2 


EERELETIITTIIIEIN | 
KULT TETZ 32 
99999911191 1181 a) 


Das Zählen ist hier besonders einfach: Ganz rechts wird eine 

Ö mit einer ] vertauscht oder umgekehrt. Beim Aufwärtszählen 
gibt es von ] nach ® einen Übertrag in die nächste Stelle, 
beim Abwärtszählen beim Wechsel von ® nach ]1. Wenn Sie die 
Spalten in der Zahlenkolonne ansehen, finden Sie, daß die 
Stelle ganz rechts (die @. Binärstelle) einfach zwischen ® und 
I wechselt, auch über den Wechsel von positiven und negativen 
Zahlen hinweg. In der Stelle Nr. ] findet der Wechsel jedes 
zweite Mal statt, in Nr. 2 jedes 4. Mal, in der Nr. 3 jedes 
achte usw. 
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Wir haben damit eine binäre Schreibweise für positive und 
negative ganze Zahlen, die sehr einfache Rechenregeln für die 
Addition und Subtraktion nach sich zieht. Der VC 20 inter- 
pretiert diese Zahlen beim UImrechnen in Dezimalzahlen genau 
dann als negative, wenn die ]5. Stelle (beachten Sie, daß die 
Numerierung der Stellen rechts mit f und nicht mit ] anfängt !) 
eine Eins ist. Das sieht dann so aus: 


1onBnonnnn = -32768 
1onnonnnnnneel = -32767 
11191 11111111111 = -] 
nonnnnonnnddngon = 2 
nadnonnnnddnnadl = ] 


BI11911111111118 = 32766 
BI1T1111111111111 >= 32367 


Vertauscht man in einer solchen Zahl alle Nullen gegen Einsen 
und umgekehrt, so findet man eine neue Zahl, wobei die Summe 
aus beiden -] ist. Genau diese Vertauschung macht die logische 
Operation NOT (logische Verneinung). NOT A ist also -A-1 (für 
jedes A). Damit ist auch klar, warum die Verneinung von @ 
ausgerechnet (!) -]1 ist und nicht +1. Wenn man die ] in der 
15. Binärstelle nicht zum Anlaß nimmt, die ganze Zahl als 

16 zu hohe Zahl. 
Diese Interpretation kommt beim VC 20 auch vor, und zwar bei 


negativ aufzufassen, bekommt man eine um 2 


den Zeilennummern, die ja immer positiv sind, aber bis 63999 
gehen dürfen. 


Wird nun AND oder OR auf zwei Zahlen angewendet, so geschieht 
das einfach für jedes Bit einzeln: 


37 | Bnoddndndaaıddle 37 \Bodoonaaadıaaıd 
Badnanndnaı dann Dondnanadnııdnng 


Dononnnnanionnen 37 OR 48IBABRABEadTıgyıg 
=53 










37 AND 48 
=32 


6] 





ZCHHITZEIL_-THAH5D 
Yer ınmnhbkemdlıivmate Frand mit ©GÖOTO 


Format: GOTe n 
mit einer (im Programm auftretenden !) Zeilennummer n 


Die Zeile mit der Nummer n muß tatsächlich existieren, 

und sei es auch nur als Remark (REM). Mit GOTO kann man 
beliebig vor und zurück springen, also auch Schleifen 
erzeugen, aus denen man entweder durch IF-THEN-Anweisungen 
oder durch Abschalten des Programms herauskommt. GOTO 
gilt in der Informatik als unfein, weil es zu unüber- 
sichtlichen Programmen verleitet. Insbesondere ist es 
wenig empfehlenswert, aus einer FOR-Schleife in eine andere 
zu springen. Nach einem GOTO-Sprung hat der Computer keine 
Erinnerung mehr daran, von wo er gesprungen ist; er macht 
einfach dort weiter, wo er jetzt ist. 


Eine Fangschleife der Form n GOTO n ist keineswegs so 
absurd, wie sie aussieht: Das Programm fängt sich in einer 
solchen Schleife wie in einem Kreisverkehr ohne Ausfahrt. 
Man kann diese (an sich unelegant aussehende) Form der 
Beendigung eines (sichtbaren) Programms sehr gut benutzen, 
wenn auf dem Bildschirm ein Bild mit PRINT oder mit POKE 
erzeugt worden ist: Ein END- oder STOP-Befehl würde eine 
störende READY-Mitteilung nach sich ziehen, die nicht selten 
das Bild ein Stück aus dem Bildschirm herausschiebt. 
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HEZTECHER 


ji 


\ 


ln ter Fo sr arme it GO30[UE 

Format: GOSUB n (im übergeordneten Programmteil) 
RETURN (am Ende des untergeordneten Teils) 

mit der Zeilennummer n, bei der der untergeordnete 


Teil beginnt 


Die Anweisung GOSUB (was "go to subroutine" heißen soll) 
arbeitet ähnlich wie GOTOQ, markiert aber zusätzlich die 
Stelle, an der sie selbst steht,mit einem aktuellen Fähn- 
chen (bildlich gesprochen), damit es beim nächsten RETURN 
wieder dort weitergehen kann. Das Unterprogramm ist nichts 
weiter als ein Programmstück, das mit der Anweisung RETURN 
endet und in das man mit GOSUB springt. Es muß vermieden 
werden, daß der Programmlauf anders dorthinein gerät, weil 
der Computer dann bei RETURN nicht wissen kann, wohin. 


Bekannt - 





Steht ein Unterprogramm also hinter einem Hauptprogramm, 
so muß dieses mit END, STOP oder einer Fangschleife enden. 
Im Gegensatz zu anderen Programmiersprachen verwenden die 
Unterprogramme in BASIC die gleichen Variablen wie das 
Hauptprogramm. Für die "Übergabe" muß man also selbst 


sorgen. 


Wie. 


N 
Av 


Beispiel: Im Hauptprogramm tauchen Polarkoordinaten 
Rl,WI und R2,W2 auf, die jeweils umgerechnet werden 


müssen, bevor ein Punkt gezeichnet werden kann: 


128 RR=R1:WW=W1:GOSUB 80@:POINT 2,308+X,209-Y*3/2 
138 RR=R2:WW=W2:GOSUB 880:POINT 2,500+X,400-Yx*3/? 


198 GOTO 199 
800 X=RR*COS(W):Y=RR*SIN{WW) RETURN 


Sie an diesem Beispiel auch sehen, geht es bei GOSUB 


nach erfolgter Rückkehr in der gleichen Zeile weiter. 


Mit GOSUB kann man auch in BASIC einigermaßen strukturiert 


programmieren, indem man einzelne Blöcke des Programms 


als Unterprogramme nacheinander oder auch ineinander ver- 


schachtelt mit GOSUB aufruft (natürlich ohne logische Purzel- 


bäume !). 


IoERrR LU G5SIZ=CHE ”ERTGTHIERBERBRHHKHHDF 


Der ZFrmonaert 


Format: 


mit 


ıiler OH 


fi 


ON m GOTO n1l,n2,n3 usw. 
ON m GOSUB n],n2,n3 usw. 
einer Zahlenvariablen m und vorhandenen Zeilen- 


nummern n],n2 usw 


e 
[2 
|| 


en 


AR ZLI I > en Dr 
u A Y U WAHEEEAf 
gaum VILLE © Kar 


Hier stehen hinter G0TO bzw. hinter GOSUB gleich mehrere 
Zeilennummern, durch Kommata getrennt. Zu welcher gesprungen 
wird, hängt von der Zahl m ab: Ist’ sie (notfalls nach Abrunden) 
=], so geht es zur ersten Adresse, bei 2 zur zweiten USW. 
Ist m kleiner als I oder (auch nach Abrunden) größer als 
die Zahl der Zeilennummern, so geht es mit der nächsten Zeile 
weiter. Oft möchte man einen Sprung von dem Vorzeichen (SGN) 
einer Zahl abhängig machen: 

1d@ INPUT A 

118 ON 2+SGN(A) GOTO 1290,130,149 

128 PRINT"A IST NEGATIV":END 

138 PRINT"A IST NULL":END 

148 PRINT"A IST POSITIV":END 


SGN hat nämlich entweder den Wert -1I oder PB oder +]. 


Im FRLLE EIMNES FHLLES 


Beni mat: Amel i za aet0T mit Ir 


Format: IF bTHEN a 

mit einer Bedingung oder Zahlenvariablen b 
und einer Anweisung(-folge) a (worin die Anwei- 
sungen mit Doppelpunkten getrennt sind) 


Was zwischen IF und THEN steht, wird in eine Zahl umge- 

wandelt (wenn es nicht schon von vornherein eine ist), und 

zwar wird aus einer nicht erfüllten Bedingung (z.B. A=B, wenn 

A gerade den Wert 7 und B den Wert 8.3245 hat) eine ®, aus 
einer zutreffenden (z.B. A=B, bevor diese irgendwelche Werte 
zugewiesen bekommen haben, also noch beide @ sind) eine -] 
gemacht. Ist das Ergebnis von b ungleich ® (z.B. bei der 
zutreffenden Bedingung), werden die Anweisungen hinter THEN 
ausgeführt; ist es aber =@, so geht es in der nächsten Zeile 
weiter (nicht etwa mit der nächsten Anweisung: Alle Anweisungen 
hinter THEN in der gleichen Zeile hängen von der Bedingung ab !), 


— 
Pe 
een ne 
Muß von mehreren Bedingungen nur eine erfüllt sein, kann 
man sie mit OR koppeln: 
IF A=4 OR B=7 THEN PRINT A$ 
Müssen mehrere Bedingungen gleichzeitig erfüllt sein, 
kann man sie entweder mit AND koppeln, oder die IF-Anwei- 
sungen schachteln: 
IF A=® THEN IF B=5 THEN PRINT"A=@,B=5" 
Wenn man die besonders unwahrscheinlichen Bedingungen 
voranstellt, kann man damit die Rechenzeit verkürzen (denn 


dann brauchen die anderen nicht mehr bearbeitet zu werden, 
falls die erste nicht zutrifft). 


Fragen Sie nicht äuf Gleichheit ab, auch nicht, wenn die 
Zahlen nach Ihrer Ansicht ganz sein sollten: 
ıd ıF 9#2=9*9 THEN PRINT"OK":END 
II PRINT"NANU ?" 
Zur Erklärung: Die gleiche Rechnung wird hier auf 
zwei Arten formuliert und auch auf zwei Arten gerech- 
net; leider stimmen die Ergebnisse nur sehr genau, 


aber nicht ganz genau überein. 


Machen Sie es lieber so: 
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108 IF ABS(A-127)C1E-6 THEN PRINT"A IST ETWA =127" 


Wenn Sie Bedingungen zwischen IF und THEN schreiben, können 
Sie die ganze Anweisuna wie in der (enalischen) Umgangs- 
sprache verstehen. Mit Zahlen geht es manchmal kürzer: 

28 IF A THEN PRINT "A IST UNGLEICH @" 
sie können sogar aanze Rechenoperationen ohne IF und THEN 
abhängig machen: 

18 INPUT A:PRINT 13-(A=>3)*3:60T0 19 
Der Ausdruck in der Klammer ist -], wenn A größer oder = 3 


ist, sonst @. Es wird also entweder 13 oder 16 ausgedruckt. 





DAS GAHZE GLEICH HEHFRRrRIALS 


Schleitfrtern mit FOR ung HE-=T 


Format: FOR i=aTO0e oder FOR i= a TO e STEP s 
NEXT oder NEXT ii 


Alle Anweisungen, die zwischen der FOR-Anweisung und NEXT 
stehen, werden mindestens einmal durchlaufen. Danach wird 

der Laufwert i, der mit a startet, jeweils um I bzw. um 

s (was auch negativ sein darf) erhöht. Wird der Endwert e nicht 
erreicht oder überschritten, so wird die Schleife erneut 
durchlaufen. Alle genannten Zahlen brauchen nicht festge- 

legt zu sein, sondern können sich im Programm als Variable 
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ergeben; der Laufindex i kann sogar in der Schleife durch 
andere Anweisungen abgeändert werden (was aber nicht unbe- 
dingt zur Übersichtlichkeit beiträgt). Man kann auch mehrere 


Schleifen ineinander verschachteln: 


18 FOR J=1 TO 18:FOR K=1]1 TO 18 

ZISPRINT JE" ER, et K 

38 NEXT:NEXT 
Dabei ist darauf zu achten, daß die Laufwerte i (im Beispiel 
J und K) dann verschieden sind (das wird leicht bei der Be- 
nutzung von Unterprogrammen übersehen). 
Oft schreibt man eine ganze Schleife mit Inhalt in eine 
einzige Zeile. Das geht nicht, wenn im Innern z.B. IF...THEN 
steht: Die NEXT-Anweisung darf nicht von der IF-Bedingung 
abhängig gemacht werden. 


Oft soll eine Schleife nur durchlaufen werden, wenn a kleiner 
oder gleich e+s ist. In manchen Fällen ist das durchaus unge- 
wiß. Man muß dann vor die Schleife einen bedingten Sprung 
(mit IF aye+s THEN GOTO n, wobei n die nächste Zeilennummer 
hinter NEXT ist) setzen, der die ganze Schleife überspringt. 


I. EBEIH ICH 7 


Zi I1bentrermnınang mMmıt Foßnzel)ı 


Manche Funktionen sind nur für sehr wenige Dinge nützlich, 
dann aber sehr. Dazu gehört POS(®), womit einfach die Nummer 
der Spalte abgefragt wird, in der gerade geschrieben wird. 
Wenn Sie eine lange Liste von Wörtern schreiben lassen, 

kann dies in laufenden Zeilen geschehen: Erst wenn eine Zeile 
fast voll ist, soll es in der nächsten weitergehen. Das kann 
man so machen (die A$(i) seien mit Wörtern aufgefüllt, die 
nicht länger als 8 Zeichen seien): 


78 FOR I=]1 TO 58 
88 PRINT A$(I)+" ";:IF POS(8)>13 THEN PRINT 


90 NEXT 
Nun sind manche Wörter so lang, daß dieses Verfahren nicht 
mehr gut aussieht: Man kann dann in den Wörtern Trennungs- 
zeichen einbauen, die beim Schreiben wieder entfernt werden 
(dazu brauchen Sie MID$() und LEN() in einer Schleife): 
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Bei Leerzeichen oder diesen Trennungszeichen wird die POS 
abgefragt und die Zeile gegebenenfalls gewechselt; am 
Schluß der Zeile bleibt das Trennungszeichen natürlich 
stehen. 


Sie können auch versuchen, die Regeln des DUDEN über die 
Silbentrennung in BASIC umzuschreiben (statt die möglichen 
Trennungsstellen bei den einzelnen Wörtern vorzugeben). 

Das ist natürlich viel schwieriger, und es wird nie so weit 
gehen, daß der Computer weiß, wie er STAUBECKEN trennen 
soll, da er nicht wissen kann, ob es Becken zum Stauen oder 
Ecken voller Staub sind. 


” REM SILBEHTRENHUHG CDER LUSTIGE ZU05 


IATA AMEI-SEN-. WAH-DER- . EREIT-MAUL-. ZUT-TEL-. RIE-3EN- 
IATA KROE-TE.EU-LE.AF-FE. NAS-HORN. KRO-KO-DEL 

FÜRI=S TO 4:READ ACID CHEKT 

FORI=3 TO 4:READ EECISCNEHT 


EUREN 


IT IN La Ü 
Sm 


3 DESHECLREHTELDHSOHBRURHDG 1 HS 

a For I=1 TO LEHMECHN 

a Df=MIDEICH,I:.1. 

za IF Df="-" AHD FOScanlles THEH HEART 

aa IF Dt="-" THEH PREIHT DE:FRINT:HEST 

1a@ FRIHTDOE: 

11f HMEAT 

126 FOR J=a TO Zaae: NEAT 

i33 FRIHNT" "::IF Püzceınle THEN FREIMT:FEIHT 
144 GOTO Sa 


Bauen Sie dieses Programm zu einem großen Wunderzoo aus ! 
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DEE ZEERLLLT 
DI LLZLLL LSA 
Ir 






Io IE GHz IDIREHFTE Tour 
Zchreihen urnd Le=sen im Trelchernr 


mit POoFfE und FEEH.“)N 


Format: PEEK.(H.) 
POKE n,b 
mit Speicherplatznumner n (G bis 65535) und 


Byte b (@ bis 255) 


Fast alle BASIC-Anweisungen arbeiten mit Variablen, von 
denen der Computer weiß, wo er ihre Werte notiert hat. Man 
kann aber auch direkt zugreifen. Die Abfrage erfolgt mit 
der Funktion PEEK() von der Speicherplatznummer, die eine 
ganze Zahl von @ bis 65535 sein muß (notfalls wird auto- 
matisch abgerundet), z.B.: 

PRINT PEEK(283) 
gibt den Inhalt des speziellen Platzes Nr. 283 aus, der 
die Kenn-Nummer der jeweils gedrückten Taste enthält. 
Manche Speicherplätze können nur gelesen, aber nicht wil]- 
kürlich gefüllt werden: Read-Only-Memory = ROM. Andere 
können auch während der Benutzung des Computers mit neuen 
Inhalten beschrieben werden; man nennt sie RAM = Randon- 
Access-Memory (was jedoch etwas anderes bedeutet: daß man 
sie in beliebiger Reihenfolge ansteuern kann). Mit der 
BASIC-Anweisung POKE kann man im RAM schreiben, z.B. 

POKE 659,128 


Dieser Speicherplatz wird bei gewissen Routinen abgefragt, 
und wenn Sie den Inhalt geändert haben, so beeinflussen Sie 
damit den Verlauf dieser Routinen,so als hätten Sie eine 
Weiche bei einer Eisenbahn gestellt. Im speziellen Fall 
dieses Beispiels geht es um die Dauerfunktion der Tasten: 
vgl. Seite 20. 

Bei vielen anderen Speicherplätzen kann man sich das ähn- 


lich vorstellen wie das Stellen einer Weiche, 


Viele trickreiche POKE-Adressen wirken wie Zauberei, 
andererseits ist es leichtsinnig, wahllos mit POKE in dem 
Speicher "herumzustochern", wenn im Speicher ein noch nicht 
extern abgespeichertes Programm steht. Die Gefahr ist sehr 
groß, daß der Rechner "abstürzt" und nur durch Aus- und 
Wieder-Einschalten ans Laufen gebracht werden kann. Man 
sollte daher Programme mit POKE immer erst SAVEn und dann 
starten. Wird eine POKE-Adresse im Programm berechnet oder 
gar gewürfelt (etwa bei der Grafik), so muß im Programm 
dafür gesorgt werden, daß der zulässige Adressenbereich 
nicht überschritten wird. 


Im Prinzip könnte man sich für POKE je nach der Adresse 
sehr spezielle BASIC-Anweisungen und für PEEK entsprechende 
Funktionen denken und wünschen. Tatsächlich enthält der 
Superexpander VC 1211IA derartige Anweisungen und Funktionen 
für die Feingrafik, die Musik und die Abfrage von Paddles 
und Joystick, die man sonst nur sehr umständlich mit PEEK 
und POKE betreiben kann. Ein sehr einfaches Beispiel ist 
die Super-Expander-Anweisung SOUND; sie ersetzt fünf POKE- 
Anweisungen. Statt SOUND t1,t2,t3,t4,v 

muß man ohne Superexpander schreiben: 

POKE 36864,t1:POKE 36865,t2:POKE 36866,t3: 

POKE 36867,t4:POKE 36867,v 


Bei den Grafikanweisungen (POINT, DRAW usw.) wird aber 
auch noch eine Koordinatenumrechnung miterledigt. 


Ir TE 


“on H 


Damit der VC 
hat, gibt es 


Is 
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20 nicht für sich behält, 
verschiedene Ausgaben: 
Zahlen, 


was er so berechnet 

über den Bildschirm: Texte und Bilder, 
alles auch bunt 

über den Lautsprecher des Fernsehgerätes und 
über den Verstärkerausgang am User-Port 

über einen angeschlossenen Drucker 
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4. an einen externen Datenträger (Tonbandcassette, 
Diskette), zwecks späterer Eingabe in den 
Rechner zurück (das betrifft auch die 
Programme selbst) 

>. über andere externe Geräte, die ihrerseits 
Geräte wie Maschinen oder Roboter steuern. 


In diesem Buch geht es hauptsächlich um die zuerst genannten 
Möglichkeiten, vor allem um die Grafik (im Zusammenhang damit 
dann allerdings auch um Drucker und externe Träger). 


fi 


DEF "WC zZ ALS FROSrRARMMNIERFTER 


RECHHER 


N 
3 


zahlen anu =Sseahb 


Die Ausgabe von Zahlen mit PRINT X erfolgt je nach dem Wert 
der Variablen X als Ganzzahl, Fließpunktzahl (z.B. 3.76) 

oder Fließpunktzahl mit Exponenten (z.B. 6.367E-23). Leider 
ist eine normgerechte Tabellierung damit sehr umständlich: 

Es gibt hier keine Format-Anweisung, die dafür sorgen würde, 
daß alle Dezimalpunkte untereinander, also in der gleichen 
Spalte erscheinen. Man kann zwar allerhand String-Operationen 
auf die Zahlen anwenden, muß aber die mit E geschriebenen 
Zahlen dabei besonders behandeln. Relativ einfach geht es 

mit Integer-Zahlen: z.B. PRINT RIGHT$(" "+STR$(A%),6) 


Mehrspaltiges Ausgeben von Zahlen ist nur bei Integer-Zahlen 
sinnvoll, da die Anweisung PRINT X1,X2 die beiden Zahlen auf 
zwei Spalten von je der halben Bildschirmbreite verteilt. 
Fließpunktzahlen sind jedoch dafür oft zu lang, und es gibt 
dann ein häßliches Überlaufen in die nächste Zeile. Kurze 
Zahlen, insbesondere mit erzwungener Ganzzahligkeit (Denken 
Sie daran, daß auch Zahlen, die theoretisch ganz sein sollten, 


13 


aufgrund von ungenauer Rechnung viele Nachpunktstellen haben 
können !) kann man mit TAB( ) tabellieren, z.B.: 
80 PRINT X1;TAB(7)X2;TAB(14)X3 


(noch besser mit der oben erwähnten Stringsbehandlung, damit 
sie nicht links- sondern rechtsbündig erscheinen). 


DER Wl > DIAL_LÖOGSPRARTHER 


fi 
5 
Ti 
m 


I 
u 
IT 
ii 


Test Hu. 


Während bei Zahlen in PRINT-Anweisungen stets ein Leerzeichen 
nachläuft und ein positives Vorzeichen als Leerzeichen er- 
scheint, werden bei der Verwendung des Semikolons zwischen 
Stringvariablen in der PRINT-Anweisung keine Zwischenräume 
gelassen: PRINT "OBER"; "KREIS"; "TIER"; "ARZT" 

liefert also: OBERKREISTIERARZT 


Farb- und Reverse-Umschaltungen sowie Cursor-, HOME- und 
CLR-HOME-Schritte können als eigene Strings (direkt oder 

in Form von Stringvariablen) und als Bestandteile von Strings 
in PRINT-Anweisungen verwendet werden. Damit kann man z.B. 

in einem laufenden Text Hochzahlen oder unten angehängte 
Indexzahlen schreiben, z.B. Na,S0, oder acıb2ece. Sie 

können auch Längenzeichen in lateinischen Grammatikprogram- 
men verwenden (Cursor auf, _ ,„ Cursor ab, Cursor links, Vokal) 
oder einzelne Wörter oder Wortbestandteile in anderen Farben 
schreiben als den übrigen Text. Zu einem schönen Schriftbild 
gehört der großzügige Gebrauch von Leerzeilen (am einfachsten 
mit “Cursor ab am Beginn der neuen Zeile), vor allem wenn man 
Großbuchstaben verwendet. Die Beachtung der Silbentrennung 

an den Zeilenenden sollte Ehrensache sein. Sie ist auch dann 
möglich, wenn innerhalb einer Zeile mehrere PRINT-Anweisungen 
(die dann mit dem Semikolon schließen müssen) aufeinander- 
folgen, ohne daß es immer die gleichen sind. Dazu gibt es 

die Funktion POS(). 
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“IELE Z0RTEH GrFHArFIE 


Es gibt mehrere Arten, mit dem VC 20 Bilder auf dem 
Bildschirm zu erzeugen, die sich in der Vielseitigkeit 

und im Programmieraufwand unterscheiden, aber technisch 
einiges gemeinsam haben. Daß der (nutzbare Teil vom) 
Bildschirm in 22 x 23 Zeichen und jedes Zeichen in 

8 x 8 Pünktchen eingeteilt sind, liegt allen Verfahren 
zugrunde. 256 verschiedene Zeichen sind im VC 20 schon 
"vorgefertigt", sie können besonders einfach benutzt 
werden, mit PRINT oder mit POKE. Wenn das nicht ausreicht, 
kann man mit speziellen POKE-Anweisungen eigene Zeichen 
(aus dem 8 x 8 - Raster) festlegen und damit fast den 
ganzen Bildschirm willkürlich vollzeichnen. Das ist 
vergleichsweise umständlich; darum gibt es Hilfsprogramme, 
die das beim Zeichnen von Punkten, Linien, Kreisen usw. 
erledigen. Der Super-Expander enthält ein solches Hilfs- 
programm mit eigens dazu verfügbaren BASIC-Anweisungen. 
Aber auch dann kann es noch interessant sein, mit POKE 
darin Bildteile auszutauschen (oder sogar mit PRINT). 

Wir fangen aber mit dem einfachsten Verfahren an: Sie 
brauchen ja nicht alle auszuprobieren, sondern nur So 


weit, wie Ihnen der Effekt das Hineinknien wert ist. 





+5 


SICHHEL_L_ 117410 EIHFrRCH 


E:ilober "vitrt FRIHT sv Honmma lm ar ıiH 


Wer einen VC 20 (oder einen anderen Rechner von Commodore 
oder auch einigen anderen Firmen) hat, sollte wirklich keine 
Grafiken aus so primitiven Buchstaben wie I oder 0 zusammen- 
basteln. Schließlich sind ja auf den meisten Tasten noch 
zwei Grafikbausteine mitgeliefert, und alle Zeichen kann man 
"revers" (d.h. mit Vertauschung von Papier- und Tintenfarbe, 
wie es anschaulich genannt werden kann) setzen und obendrein 
in 8 verschiedenen (Tinten-)Farben auf 16 verschiedenen 
(Papier-)Farben. Sie haben sicher schon im direkten Zugriff 
auf diese Weise Bilder zusammengebaut. Um dasselbe auch in 
einem Programm zu tun, muß noch einmal an den Gänsefußmodus 


erinnert werden: 


Es gibt im VC 20 eine Stelle, die festhält, ob seit dem 
letzten Drücken von RETURN das Gänsefüßchen " eine ungerade 
oder eine gerade Anzahl oft gedrückt wurde (das Löschen 

von Gänsefüßchen auf dem Bildschirm hat darauf keinen 
Einfluß !). Bei "gerade" werden Cursor- und Farbeingaben 
(einschließlich Reverse On/Off und Home/Clear-Home) 

direkt ausgeführt, d.h. z.B. daß die Schrift ihre Farbe 
ändert. Das hat aber beim Schreiben eines Programms keinen 
Einfluß auf die spätere Ausführung. Ist aber das Gänse- 
füßchen " einmal (oder dreimal usw.) gedrückt worden, 

so erscheinen auf dem Bildschirm seltsame Zeichen, aber 
durchaus in der alten Farbe. Sie bleiben im Programm stehen 
und bewirken später bei der Ausführung, daß dann die Farbe 
wechselt oder daß dann der Cursor z.B. nach oben springt 
oder nach HOME. 


Am besten üben Sie zunächst im direkten Modus, wie man mit 
den Reverse-, Farb- und Cursor-Steuerungen Bilder zeichnet, 
und geben dann später die gleichen Anschläge hinter einem 
Gänsefüßchen in einer PRINTanweisung ein (natürlich dann 
mit einer Zeilennummer). 
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Sie können auch einzelne kleine Bilder als Stringvariable 


zuweisen, z.B. 


358 REM ELUMEHTÜEFFE 
31: 


185 At="Te re te 
114 PRIMT"I M",:FOR Isa TO 4: FOR J=a TO 4 


128 FRIHT AF"TTER": :NEAT 
\ * 
= 


138 PRINT:PRIHT"M ":HEAT 


145 GOTO 146 
/ 


23 REM UMELAPPBILD 

31: 

1808 M3=" 5 KuNGT 

116 PRINT"S";:FOR I=s8 TO 167: PREINT A$;:HEKT 
128 GOTO 128 


Das bunte Bild kann dann wie ein Textwort mit PRINT an eine 
gewünschte Stelle "geschrieben" werden: 7® PRINT A$(3). 

Die Stelle, an der es dann erscheint, richtet sich nach der 
Position des Cursors zu dem jeweiligen Zeitpunkt im Programm- 
lauf. Zur "relativen" Steuerung des Ortes eignen sich 
entsprechend viele Cursortasten zwischen Gänsefüßchen 

für die jeweiligen Richtungen. Beachten Sie dabei, daß 

auch der Sprung nach rechts rückgängig gemacht werden muß, 
der nach jedem Schreiben stattfindet, und daß Sie natürlich 
jede PRINT-Anweisung mit dem Semikolon abschließen müssen, 
wenn der Cursor nicht an den Beginn der nächsten Zeile 


springen soll. 


v1 


Für eine "absolute" Steuerung des Ortes (z.B. wenn Sie 

die Bilder in einem Bilder-Memory-Spiel verwenden, wo sie 
abwechselnd an verschiedenen Plätzen erscheinen müssen) 
gibt es die Taste HOME mit nachfolgenden abgezählten (oder 
in FOR-Next-Schleifen abgepackten) Cursorschritten nach 
rechts und nach unten. 

Beachten Sie auch den Unterschied zwischen der Leertaste 
und der Cursor-Steuerung nach rechts: Die Leertaste radiert 
zugleich aus |! 


Noch ein Trick, der das Flimmern vermindert: Soll sich 

ein Bild aus mehreren Zeichen Höhe und Breite schrittweise 
über den Bildschirm bewegen, so ist es günstig, die relative 
Bewegung zu verwenden und nicht das ganze Bild mit Leertasten 
zu löschen, sondern nur die Teile, die nicht ohnehin vom Bild 
in der neuen Position ersetzt werden. 


Die relative Positionierung hat leider einen Nachteil: Man 
kann sie nur auf einen Gegenstand anwenden, da es für den 
Cursor nur eine Position zu jedem Zeitpunkt gibt. Bewegen 

sich zwei Objekte unabhängig voneinander über den Bildschirm, 
so muß man sie entweder "absolut" (d.h. jedesmal von der HOME- 
Ecke aus) lenken oder aber (zumindest für das zweite und 

alle weiteren) auf die Grafik mit POKE ausweichen. 


MIAarıcHriAa_ 7 EESTZSER : 
Bilder mit POHFE ung Hormal Zar-arıik 


Dieses Verfahren leistet an fertigen Bildern das gleiche wie 
das vorige, ist im allgemeinen langsamer und bei Bildern 

aus mehreren Zeichen umständlicher. Interessant ist es 
trotzdem: Zum einen, weiles die Organisation des Bildschirms 
offenlegt, und zum anderen wegen des Überganges zu feineren 
Methoden, besonders zur Viertelpunktgrafik und zu Histogrammen. 
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Der HOME-Position sind zwei verschiedene Speicherplätze zu- 


gewiesen, und zwar: 


für die Form | für die Farbe 
ohne Erweiterung oder mit 3 kB 7688 38490 
mit 8 und/oder 16 kB Erweit. 49896 37888 





Die jeweils folgenden Speicherplätze betreffen die anderen 
Plätze auf dem Bildschirm, und zwar zeilenweise von links 
nach rechts, wie die Buchstaben auf einer Buchseite, aber 
nur mit 22 Nummern pro Zeile und 23 Zeilen (vgl. Abbild- 
dung im Anhang Seite 172). Wenn Sie nun ein bestimmtes Zei- 
chen eintragen möchten, müssen Sie aus Zeilen- und Spalten- 
Nummer die Speicherplatzadressen berechnen und in der Liste 
"Bildschirm-Code" die Nummer für die Zeichen-Form nachsehen 
und natürlich den Farbcode. Um z.B. den vollen Kreis (Nr. 8]) 
in die Spalte X und Zeile Y (gezählt von links oben, jeweils 
mit d als Anfang) zu setzen, z.B. in der Farbe Rot (Nr.2), 
brauchen Sie die Anweisungen: 

1d POKE 7680+X+Y*22,31:POKE 384@0+X+Y*22,2 
(Das Ausrechnen überlassen wir also dem Computer: wozu kann 
er schließlich rechnen !) 
Achten Sie bitte bei allen POKE-Anweisungen darauf, daß 
die Adressen im zulässigen Bereich liegen ! Es muß dafür 
gesorgt werden, daß X oder Y nicht negativ oder zu groß 
werden (notfalls durch IF-Abfragen). Vergessen Sie auch 
die Konstanten 7680 bzw. 38498 nicht, oder wenn Sie sie 
zu Variablen machen, achten Sie darauf, daß sie nicht 
im entscheidenden Augenblick den Wert Null haben: POKE- 
Anweisungen mit niedrigen Adressen lassen den Computer 
oft abstürzen. Dann hilft nur noch der Netzschalter, und 
das Programm muß neu eingegeben werden (Faustregel: 
Programme mit POKE erst SAVEn, dann starten !). Bedenken 
Sie bitte, daß POKE ein ziemlich direkter Eingriff in das 
Innenleben des Computers ist und für die Software so 


ähnlich ist, wie für die Hardware ein Anbringen irgendeiner 
Lötverbindung. Niemand wird das blind und auf Verdacht 
machen ! Aber Sie sollen vor POKE auch nicht zuviel Angst 
bekommen: Mehr als Ihr eigenes Programm können Sie damit 


nicht kaputtmachen |! 


Sr HNICHT =0 GrRÜE 


Feine Ealtbsm=aärr2+ it wen 17 


Um Größen zu veranschaulichen, kann man sehr gut senkrechte 
oder waagerechte Säulen zeichnen. Die von den Tasten her 
erreichbaren Grafikzeichen erlauben dabei auch Untertei- 
lungen auf 1/8 eines Buchstabenformates genau. Liegen die 
Balken waagerecht, ist es sehr bequem, PRINT zu verwenden, 
bei senkrechten ist das POKEn in das Video-RAM einfacher; 
man kann aber beide Methoden in beiden Fällen verwenden. 
Nehmen wir an, die darzustellende Zahl sei bereits auf den 
Zahlenbereich bis rund 169 zurechtgestutzt ("normiert"). 
Die Zahl der ganzen Felder erhält man mit Division durch 8, 
der Rest gibt an, welches Zeichen das verbleibende Feld 
gerade zu der richtigen Anzahl von Achteln ausfüllt. Für 
den ganzzahligen Anteil kann man eine Schleife nehmen, muß 
sie aber umgehen, wenn dieser Anteil null ist. Geben Sie 


bitte das Programmbeispiel ein! * 


REM BALKENGFEAFTE MAAGEREOCHT MIT FEIHT 


TAT At u i "2 " y "a n y "u Ki "ug it i u er ' ; u u j" 4 7) j" 
Für Isa TO FIREAD GEIISCHEST 
“zaut? SELOSETIHERPL- TH) 


at 


ink 


— 
une 


IF Al “4 THEH 45 

FOR I=sl TO =26:FRIHT"SIT:CHEST 
PRIHTGECHFI 

T=-T+.-:50T035 


*Da aus dern AuslLTISlung die Tasten nicht eindeutig hervorgehen: 
Die Reihenfolge ist: Leertaste, GH FI KLNM, jeweils mit 
Commodore-Iaste und mit Reverse On bzw. Off. 


OH EN Br Lo are 0 m 
= 
Hi 
m 
_r 
5; 


a 
tat 
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In Zeile 68 kann man verschiedene Zeichen verwenden: Das 
reverse Leerzeichen füllt die Balken ganz aus; reverse T- 
Winkel gestatten dagegen ein Abzählen der ganzzahligen An- 
teile und eine deutliche Trennung von einem Balken der 
nächsten Zeile, d.h. sie hinterlassen ein Raster, Einen 
ähnlichen Effekt hat auch der reverse Vollkreis. 


Vergessen Sie aber nicht, auch die Farbe zu POKEn ! 
Zur Sicherheit ein Beispiel für eine Säule von unten nach 
oben: 


r REM HISTOGSERMM SEHERECHT MIT FÜHE 
1a DATA 32.120. 111. 121: 95, 24, 24, ZEV 
2a FÜR I=ia TO T:RERD GeoIDScHER T 
34 FREIHT"T:FÜOR ==h TO 21 
+ ERS RELOISER HER Fi-4r2: 
A Ed GE INTETFSEN N Fett 
ei IF voii THEH 1m 
va FÜR I=l TO Y 
23 FÜHEE VESHSletä-2s#]. 205 
ag FÜEE 224349254 3-22H#1,5 
1a HEAT 
11a FÜHE VESSHSBEt EZ brln. Ge Yin 
122 FOEKE 234ag-+- SEE 4a 2ER GHL).E 
1324 HEHT 
139 G0T0 148 


Falls nacheinander immer wieder neue Säulen an die gleiche 
Stelle gesetzt werden sollen, braucht die jeweils alte 
nicht unbedingt ganz gelöscht zu werden (das würde auf 
störende Weise flackern); es genügt eine Schleife, die 

den Teil über der neuen Säule löscht. 


Ein anderer grafischer Trick mit normalen Tastatur-Grafik- 
zeichen benutzt die verschieden hohen waagerechten oder 
die unterschiedlich weit nach rechts gerückten senkrechten 
dünnen Striche. Ihre Bildschirm-Codenummern” sind: 


ent. 


“vgl. Anhang Seite 168 ££. 


3] 


waagerecht: (unten) 109,82,70,64,67,68,69,99(oben), 
senkrecht: (links) 191,84,71,66,93,72,89,1@83(rechts). Mit 
ihnen kann man relativ bequem Funktionen darstellen, bei 
denen waagerecht ein grobes Raster genügt, senkrecht aber 
ein feines erwünscht ist, oder umgekehrt. 


MITTELFEIHES 


rt 


dr bn 1 Sr af ıiHE nn ı tt +4 << 4 PFıaunmk 


Der Vorteil dieser Grafik ist, daß sie sich mit den auf der 
Tastatur vorhandenen Zeichen begnügt (also den Zeichensatz 
nicht neu definieren muß), aber dennoch über 2888 Punkte auf- 
löst, und zwar in beiden Richtungen etwa gleich. 


Zunächst werden die nötigen Grafikzeichen (es sind 16 an der 
Zahl, da jedes Viertel eines Zeichenplatzes voll oder leer 
sein darf, und weil 53-16 ist) vernünftig numeriert: 


St 


us, iu er eo 12 VS 14 15 


Das sind natürlich Binärzahlen, bei denen jedes Bit eines der 
vier Viertel anzeigt, und zwar mit der Übersetzung ins Dezimale 


1 
48 


Leider entsprechen die Bildschirmcode-Nummern dem nicht, so 
daß man eine Zuordnungsfunktion G%() und ihre Umkehrung H%() 
braucht: 6% ordnet jeder der Zahlen @ bis 15 den Bildschirmcode 
des zugehörigen Grafikzeichens zu, H% umgekehrt. 


Die Koordinaten eines Punktes seien XX und YY (von links 
unten an gezählt, XX von @ bis 43, YY von ® bis 45). Für das 
gröbere Raster der 22 Spalten und 23 Zeilen muß man einfach 
ohne Rest durch 2 teilen. Die Reste (@ oder ]) bestimmen nun, 


en 
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4 REM YG=g9 ABFRAGE 

3 REM YG=1 35ETZEH 

& REM YWG=2 LOESCHENH 

7’ REM YG=3 IHVWERTIEREN 
8: 
3 REM VORLAUF ZUR WIERTELGRAFIK 

18 DIM 626153, HRC255::Po=7689+434:P1=384H3+r424 

28 DATA 32,126, 124, 226, 123, 97,259, 236,199, 127, 225, 251.95, 252, 234, 160 
38 FOR I=8 TO 15:READ GACI3 :HASGRKCTH ST: NEAT 


49: 
108 REM BEISFIEL FUER EIN HAUPTPROGRAMM 

118 FRINT"M";:FOR Is TO 21 PRINT "4 m a wo d  "SNERT 
I PRINT" a ma m. ©; 


128 FÜR #=0 TO 43 

139 Vez3r RKSINCH/3) 

148 YG=l:anek WYatti1l:GOSUR 53805 

159 VG=3: Ka! Yo: GOSUB 62008 

168 Vb=2:KX=4:7=7-11:605UB 63000 

1385 HEAT 

208 GOTÜ 280 

62335 

429339 REM UHTERFROGRAMM-SCHLEIFE, EINGABEN 84,7, WG; AUSGABE YT 

639AA AI=SINTCAR/2I:TISINTETTFEN 

530108 GeLi+ceARr AND 12 7#l4-3KCHY AND 195 

63920 P=Al-TIKEE:G1=SPEEKIP+PB3 :H=SHACGI> 

&3038 YT=SGN£G AHD H> 

63248 IFCVG=IDÜRCVG=3 AHD YT=8)THEN G2=6#CH OR 53 :POKE PO+P,G2:PÜKE Pi+P,€ 
te eve AND YT=1>THEN GZ=GACH-CH AHD G3>:FÜKE PO+P.G2:PÜKE Pi+P,6& 
386 RETURH 


READY. 


a) 


c 


welches der vier Vierte] des angesprochenen Platzes nun aus- 
gefüllt werden muß. Wir gehen natürlich davon aus, daß in den 
anderen drei schon etwas sitzt, was auch bleiben muß. Darum 
wird das alte Zeichen abgefragt (mit PEEK), mit H& in unseren 
Code umgewandelt und mit CR dazugetan. Das entstehende neue 
Zeichen, in dem der neue Punkt nun auf jeden Fall enthalten 
ist (unabhänaig davon, ob er es vorher auch schon war), wird 
nun mit POKE nach Umwandlung mit G:() in den Bildschirm 
gesetzt, sowie in das Farb-RAM. Das Hauptprogramm muß für 
jeden einzelnen Punkt die Koordinaten als XX (zwischen $ 
und 43) und YY {von @ bis 45; Nullpunkt links unten) bereit- 
stellen und auch dafür sorgen, daß dieser Bereich nicht 
überschritten wird; außerdem muß es den Modus VG fest- 
legen: VG = & bedeutet Abfragen des Punktes 
(VT ist ] bzw. @ nach der Abfrage) 

VG = 1 bedeutet Setzen (in Tintenfarbe) 

VG = 

VG = 


bedeutet Löschen (zur Fapierfarbe) 


> m 


bedeutet Invertieren (Wechseln der Farbe) 


Die Zeilen 18 bis 38 bereiten das Unterprogramm vor und 
dürfen nur einmal durchlaufen werden. Das Hauptprogramm 

in dem hier wiedergegebenen Beispiel zeichnet erst helle 
und dunkle Streifen und dann auf diesen Hintergrund drei 
Sinuskurven, eine mit Setzen (nur auf leerem Hintergrund 
sichtbar), eine mit Löschen und eine mit Invertieren. So 
verlockend das Invertieren ist: Man muß gewaltig aufpassen, 
daß eine Kurve aus zu engen Punkten sich nicht teilweise 
selbst invertiert,; das sieht dann sehr löcherig aus (Gegen- 
rezept: Schrittweite groß genug wählen oder noch besser: 
von der Steigung abhängig machen !), 


Falls Ihnen Zeile 63018 seltsam vorkommt: Das VerUNDen mit 

l ist eine Abfrage auf ungerade Zahlen; es liefert @ für 

gerade und ] für ungerade XX bzw. YY. Allgemein gibt A AND 2FN-] 
den Rest, der sich beim Teilen von A durch 2fN ergibt. 
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INA5ERAHHTE FREIHEITEH 


Eildschirme und Character = im Frhl 


Haben Sie gewußt, daß Sie 8 verschiedene Bildschirm-"Seiten" 
mit zwei verschiedenen Farbverteilungen gleichzeitig im VC 20 
unterbringen und blitzschnell] abwechselnd auf den Bildschirm 
bringen können ? In den Gebrauchsanleitungen habe ich es 
jedenfalls bisher nicht gefunden. Das Geheimnis liegt in drei 
sehr trickreichen Speicherplätzen: 36866, 36867 und 36869. 
Jeder Speicherplatz enthält bekanntlich ein Byte, also 8 bit, 
oder was dasselbe ist, eine Zahl zwischen O und 255. Wenn man 
knapp mit Speichernlätzen ist, kann man aber auch mehrere 
kürzere Zahlen, die nichts miteinander zu tun haben, zusammen- 
stopfen, z.B. zwei Zahlen von O0 bis 15. Das sieht dann so aus: 
Man schreibt sie binär, wobei man mit je 4 Stellen auskommt, 
und hängt sie aneinander, das sind dann 8 Stellen. In Dezimal- 
zahlen sieht dasselbe so aus: Man multipliziert die eine mit 
16 und addiert die andere dazu (das Malnehmen mit 16 ist ja 
dasselbe wie das Verschieben einer Binärzahl um 4 Stellen nach 


links), z.B.: 
9 sowie 5 erscheinen als 9*16+5=149 
binär: 189] 8191 18819191 


Um die einzelnen Zahlen wieder herauszufiltern, kann man in 
BASIC die Verknüpfung AND nehmen: ANDen mit 15 gibt das 
rechte Stück, ANDen mit 248 (nämlich 11110000) das linke, 
das dann noch durch 16 geteilt werden muß. Also: Was ist 
149 AND 249 ? Antwort: 144, Teilen durch 16 gibt 9, und 

was ist 149 AND 15 ? Antwort: 5. 


Nun zu den Speicherplätzen für den Bildschirm: Sie wissen, 
daß der VC 20 23 Zeilen zu je 22 Zeichen verwendet, von 
denen jedes aus 8x8 Punkten besteht, wenn Sie außer der 
gemeinsamen Hintergrundfarbe ("Papierfarbe") nur eine 
Vordergrundfarbe "Tintenfarbe") pro Zeichen verwenden, für 
verschiedene Zeichenplätze auf dem Bildschirm haben Sie aber 
dann 8 Farben zur Auswahl. Das ist der Modus mit der höheren 
Auflösung für Punkte und der geringeren für Farben. Es gibt 


eb 


auch noch den Multicolor-Modus, bei dem die Zeichen aus 4x8 
"Punkten" (eher waagerechten Streifen) bestehen, die aber 

dann alle einzeln zwischen 4 Farben gewählt werden können. 
Diese vier Farben ihrerseits sind vorzuwählen: und zwar drei 
von ihnen für den ganzen Bildschirm geltend (eine davon ist 
automatisch die Farbe der Umrandung), eine kann für jede Region 
(Zeichenposition)einzeln gewählt werden. Das hört sich sehr 
verzwickt an, ermöglicht aber eine beachtliche Vielfalt 

bei begrenztem Speicherbedarf. 


Wie groß ist nun dieser Speicherbedarf ? Dazu fehlt noch eine 
Angabe: Wie groß sol] die Auswahl an Zeichen sein, die gleich- 
zeitig verfügbar sind (d.h. die gleichzeitig auf dem Bild- 
schirm erscheinen können) ? Die Hersteller haben 28.256 
festgelegt. Betrachten wir zunächst den Hochauflösungsmodus, 
der auch bei der normalen Schrift verwendet wird: Es gibt 

also 256 Zeichen. Für jedes müssen 8x8 Punkte festgelegt 
werden, und zwar nur ] bit pro Punkt: Tinten- oder Papier- 
farbe, das sind pro Zeichen 64 bit = 8 Bytes. Für 256 Zeichen 
sind das 8 x 256 Bytes = 2048 Bytes, also2KB. Diese belegen 
gewisse Speicherplätze, auf denen der Computer jederzeit 
nachsehen kann, wie jedes dieser 256 Zeichen aussieht. 

Er muß aber außerdem noch wissen, welche Zeichen auf die 23 x 22 
Plätze des Bildschirms kommen. Für jedes Zeichen genügt die 
Information von einem Byte, da es ja gerade 256 zur Auswahl 
gibt. Der "Bildschirmspeicher" (=Video-RAM) ist also 506 Bytes 
lang, also etwas weniger als ein halbes Kilobyte. Außerdem 

muß der Computer die Farben der 506 Plätze wissen. Dazu gibt 
es ein Farb-RAM aus 506 halben Bytes. Diese sind numeriert 

wie normale Speicherplätze, beim Abfragen mit PEEK bekommt 

man aber Nonsens in den höheren Binärstellen. Man muß sie 

noch mit 15 ANDen, z.B. die Farbe des linken oberen Eckplatzes 
bekommt man (normalerweise) mit PRINT PEEK(384@@)AND 15. 
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Sie kennen (noch) den Unterschied zwischen RAM und ROM: 
RAM-Plätze kann man (z.B.mit POKE) willkürlich beschreiben, 
ROM-Plätze nur lesen. Der VC 20 hat laut Katalog 5 KB ROM; 
davon läßt man das erste (@ bis 1023) am besten in Ruhe. 

Es bleiben dann vier (von 4096 bis 8191): Hier sitzt beim 
nicht-erweiterten VC 20 auch das BASIC-Programm, das Sie 
eingeben. Auch der Bildschirmspeicher (Video-RAM) ist 

mit darin, und zwar normalerweise von 7680 an, also am 

Ende mit den hohen Hausnummern. Wenn Sie eine 3 kB-Erwei- 
terung einsetzen (z.B. den Super-Expander), so wird der 
Bereich von 1924 bis 4895 ergänzt, und BASIC beginnt 
bereits bei 1824. Anders sieht es aus, wenn Sie 8 oder 16 
kB (oder beide) einsetzen: Der Bildschirmspeicher wird 

dann an das untere Ende des Standard-Bereichs, nämlich 

ab 4896, gesetzt, BASIC beginnt dann bei 4688, und die 

drei Kilobytes darunter sind (falls vorhanden), nicht für 
BASIC-Programmzeilen verwendbar. Der Grund liegt darin, daß 
der BASIC-Bereich an einem Stück sein muß, das Video-RAM 
aber auf jeden Fall eins der 8 halben Kilobyte-Bereiche 
zwischen 4896 und 819] belegen muß. 

Wo steht nun, wo das Video-RAM liegt ? Zum Teil in 36869, 
namlich in seinen 4 "höheren" Bits, und im übrigen im 
"höchsten" Bit des Inhalts von 36866. Das sieht dann so aus: 














PEEK(36869) 













AND 240 92 4096-4607 4608-5199 
208 5120-5631 5632-6143 Video- 
224 6144-6655 6656-7167 RAM 





240 7168-7679 7688-8191 








37888-38399 Farb-RAM 





38400-3891] 


Hier sind die Plätze für das Farb-RAM gleich mit angegeben. 
Wenn Sie den VC 20 (mit maximal 3 kB Erweiterung) einschalten, 
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ist PEEK(36866)=15@, PEEK(36869)=240. Es gelten dann also 

die Bereiche 7680 ff. für die Zeichenform (Video-RAM) und 
38480 ff. für die Farben, die Ihnen vermutlich schon vertraut 
sind. 


Wenn Sie nun in die acht Bereiche der Tabelle verschiedene 
Textseiten oder Bilder POKEn, können Sie durch POKE 36869,x 
und POKE 36866,y diese abwechselnd auf den Bildschirm bringen, 
allerdings geht das nur dann mit allen acht, wenn das dazu 
nötige BASIC-Programm in einer Speichererweiterung (z.B. 3 kB) 
sitzt und Sie die Zeichensätze aus dem ROM (also keine selbst- 


definierten Zeichen) verwenden. 


Das folgende Programm (mit 3 KB Erweiterung, z.B. Super- 
Expander) erzeugt mit der normalen Tastaturgrafik acht 


verschiedene Bildschirme, die im Video-RAM jeweils ein 


REM KINO MIT 8 BILDSCHIRMIHHALTEN 

REM LEERTASTE KURZ ODER LANGE DRUECKEN 
REM 39 SEC VORLAUF 

DATA az 


=2,932,119, 120, 226,249, 239, 22% 
IATH 39,593,55,657%; 64, 749,52, 1 
FOR I=8 TOD 7:READ GREI>CHEAT 


FOR I=A TO ?:READ GZEI5:HEAT 
FÜR I=4 TO ga35: POKE da9e+l, 32: HEAT 
FOR Tsd TO 7 
FÜR #Z=B TO 21 
<J ar -FELISCAFT +9-T#n.4) 
2=15-3#6.02 0 7 DECOSC TE 4 
YG=-INTArN ETF r-T52#3 
ZG=IHTEZH: ZFSCZ-252#2 
FOR H=3 TO Ti:FOKE4IOSE+SLEFT+HF2ZHH, 16: HEAT 
FOHKE 4A9S+512%KT ++ 1) 42 2+%.GRı UF) 
FOHE dEse+I12c#T+l 26+12822+2,GZCZF?:HEAT 
AR=LIHIARSIHE TE’) 
FOKE 4dE3SE+312#T +4, 203 
HEAT 
FÜR I=3 TO 585:FOkE 394208+1,3:POKE 37883+1,3:NEAT 
T=T+1:1IFT=3 THEHN T=9 
218 Ti1=T AND e:T2=T AHD 1 
FOÜKE 365693, 1932+3#T1:POKE 36925, 22+1: 
22m GETAF: IFAF=""THEN238 
249 GOTO 2a 


ST a 


IMENDTNÄND 


N 


ALIEN OP AV DOG Meaif puW em 


)rmrmt mr pm a a ON OD ENT TI nd 


u 
Sal dd 


Ta 
Pd 
So 


SETZE 


DJ 
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halbes Kilobyte ausfüllen; die Farben sind in beiden Farb- 
RAM-Bereichen gesetzt. Für die Zahlen @ bis 7 für T schalten 
die Zeilen 21@ bis 224 den Bildschirm abwechselnd auf die 
acht fertigen Bilder. Wegen 230 und 24@ schaltet ein Tasten- 
druck jeweils zum nächsten Bild. Dauerdruck auf eine Taste 
mit Dauerfunktion (Leertaste) bewirkt eine kleine Kinovor- 
führung. - Da die Bilder rechnerisch hergestellt werden, be- 
nötigt das Programm erst einmal rund 98 Sekunden, bevor es 
etwas zu sehen gibt. 


Wollen Sie z.B. ein und dasselbe Bild mit zwei verschiedenen 
Farbmustern im schnellen Wechsel bringen, können Sie die 
Zeichennummern in einer Schleife mit PEEK und POKE in ein 
zweites Video-RAM kopieren und in die beiden Farb-RAM-Bereiche 
die unterschiedlichen Kolorierungen POKEn (was in BASIC 
zugegebenermaßen etwas schwerfällig ist). 


SEDE MEHGSGE EUCHSTHREEH 


Character —- Fon und Frnr 


Wenn Sie nun probieren, was denn zwischen den Zahlen 192 
und 248 im Speicherplatz 36869 passiert, so wundern Sie sich 
vielleicht: Da wird keineswegs das Video-RAM etwa in 


oo 


22 
> 


feineren Schritten verschoben, sondern es kommen ziemlich 
krause Dinge ins Bild. Probieren Sie aber POKE 36869,24] „ 
ebenso 242 und 243 und schreiben Sie jedesmal einige 
Buchstaben, auch mit SHIFT und mit REVERSE ON. Sie wechseln 
offenbar zwischen verschiedenen Zeichensätzen hin und her. 
Betrachten wir zunächst die fertig eingebauten Zeichen: Sie 
sitzen in den vier Kilobytes ab Platz 32768 (das ist 2137, 

Da für jedes Zeichen 8 Bytes (also 64 Bit) nötig sind, reicht 
das für 512 Zeichen. Im Video-RAM erfährt der Computer aber 
für jeden Platz des Bildschirms nur ] Byte = 8 Bit über die 
Auswahl des Zeichens, kann also nur eine Auswahl unter 256 
Zeichen vornehmen. Der Zeichenvorrat ist darum in zwei 
getrennte Zeichensätze aufgeteilt, die die Großbuchstaben 

und einen Teil der Grafikzeichen gemeinsam haben. Der Rest 
der Grafikzeichen kommt nur im |. Satz vor, die Kleinbuch- 
staben nur im 2. (mit groß und klein ist hier die Form, nicht 
das räumliche Format gemeint, also z.B. A und a; auf das 
Format kommen wir etwas später). 

Die Zeichenformen sind in der Reihenfolge des Bildschirmcodes 
gespeichert, je 8 Bytes für ein Zeichen, beginnend mit dem @ 
Klammeraffen bei 32768-32775 (Nr. 8); das A hat Nr. ] und 
sitzt in 32776-32783 usw. Die erste Hälfte des ]. Zeichen- 
satzes (Zeichen Nrn. ® bis 127) füllt damit gerade ] Kilobyte 
aus, die zweite (reverse) Hälfte ein zweites. Es folgt dann 
mit ebenfalls zwei KB der 2. Zeichensatz mit den Kleinbuch- 
staben (den man z.B. durch gleichzeitiges Drücken von SHIFT 
und C= erreichen kann). 


Man kann auch mit POKE zwischen beiden Zeichensätzen umschal- 
ten: POKE 36869,242 schaltet zum 2., POKE 36869,240 zum 
ersten. Dieser Speicherplatz ist Ihnen vorhin schon begeg- 
net: Mit seinen höheren Bits (192,208,224,248) wählt man 

die Positionen des Video-RAMS an. Nun kommen auch die nie- 
drigen Bits an die Reihe; sie bestimmen den Anfang des abzu- 
fragenden Zeichensatzes, und zwar nach diesem Schema: 


PEEK(36869) AND ]15 = 12 ab 4896 RAM 
13 5128 RAM 
14 6144 RAM 
15 7168 RAM 
d 32768 Großb.+Grafik 
] 33792 " reverse 
2 34816 Kleinb.+Großb. 
3 35849 " reverse 


Bei Codenummern ab 128, die normalerweise für die Reverse- 
zeichen zuständig sind, und beim Umschalten mit der REVERSE-ON- 
Taste (bei PRINT oder im direkten Zugriff) ist in der obigen 
Tabelle einfach um ] zu erhöhen. Besonders interessant 


ist dabei die Erhöhung von 15 auf ® (Begründung weiter unten !) 


Wenn Sie z.B. POKE 36869,24] eingeben, so erscheint die 
normale Schrift nun revers, beim Einschalten von REVERSE aber 
nicht mehr revers, sondern in Kleinbuchstaben, was nach der 
obigen Tabelle verständlich ist, da ja der niedrige Anteil 
des Inhaltes von 36869 die ] ist und durch das Reverse- 
Schalten um ] erhöht wird. 


Wenn Sie dagegen POKE 36869,255 eingeben, 


bleibt das Video-RAM da, wo es auch schon beim Einschalten 
ist, nämlich ab 7688, denn 255 AND 248 ist 248; der Anfang 

des Zeichensatzes wird aber bei 7168 gesucht, denn 255 AND 15 
ist 15. Zwischen 7168 und 7679 haben Sie Platz für 64 eigene 
Zeichen (wie sie gemacht werden, kommt sogleich), dahinter 
sitzt allerdings das Video-RAM, das natürlich Nonsens liefert, 
wenn es als Zeichensatz interpretiert wird (was genau dann 
passiert, wenn Sie nun mit SHIFT schreiben). Wenn Sie aber 
nun versuchen, revers zu schreiben, landet der Computer 

laut unserer Tabelle und der Regel, daß dann um ] zu erhöhen 
sei, bei den nicht-reversen Buchstaben aus dem ROM: Sie 
können also in diesem Modus alle nicht-reversen Zeichen, auch 
die mit SHIFT, benutzen, zusätzlich aber noch 64 neue, die 
Sie selbst festlegen. 


FUHNKT FÜR PUNKT EIH EUCHSTABE 


La= Euchstaben—-De-=. 370 


Spätestens jetzt müssen wir uns ansehen, wie die 64 Bits oder 
8 Bytes pro Zeichen organisiert sind. Schauen wir einfach 
nach ! Zwischen 32776 und 32783 befindet sich das große A, 
denn A hat im Bildschirmcode die Nummer 1, und 32768+1-8 ist 
32776. Auf die (direkte) Anweisung 

FOR 1=32776 TO 32783:PRINT PEEK(I);: NEXT 
erhalten wir die Zahlen 24 36 66 126 66 66 66 ®. Schreiben 
wir sie als Binärzahlen untereinander, wird die Ähnlichkeit 
schon etwas besser ersichtlich: 


24 = BBn11dad 
36 = Baıanıdad 
b6 = Blopanln 
126 = 81111110 
b6 = Blodanıd 
b6 = B100RG1E 

D = gdnadnneo 


Das kleine Programm "CHARACTERS" führt die Art der Zeichen- 
speicherung vor und ermäglicht es Ihnen außerdem, die genaue 
Form der Tastaturzeichen anzusehen: 


35 REM CHARACTER: 

=]: 

154 IHPUT"BEEICHENSATZ ":@ 

114 TNPUT"BEEICHEHN HR, "HM 

2a PeätiS+hHts+rlZz-17#582565 
FRIHT:FÜR I=sF TO Fr’ 

a FOR JI= 7 TO A STEP 1 

158 A=PEEKEI AND 21 

is IF A=5 THEHN FEINTTERA" : : GOTO155 
175 PRINT"BAL"; 

126 HE=ST:FRINT"@"SPEEKCI9:HEAT:GOTO 106 


mr 
£- 2% l\ 
FD 


Geben Sie dazu als Nr. des Zeichensatzes ] oder 2 ein, als 
Nummer der Zeichen ® bis 255. Das Programm schreibt dann 
zeilenweise jedes einzelne Byte, und zwar zunächst in Binär- 
ziffern (also 8 bits) und dahinter dezimal. Die binären 
Einsen werden revers geschrieben, damit das ganze Zeichen 
besser zu erkennen ist. Den Effekt können Sie noch ver- 


stärken, indem Sie die @ in Zeile 169 gegen ein X und die ] 
in Zeile 17@ gegen eine (weiterhin reverse) Leertaste aus- 
wechseln. Gedruckt sieht das mit oder ohne Zwischenraum 


so aus: 


ZEICHENSATZ 1 








ZEICHEN HR. 13° ZEICHEHNSATZ 1 ‚ZEICHENSATZ 2 
Eu ZEICHEN Hr. 18 ZEICHEN HR. 18 
ER 5 
511. ulsis[sluls wet" HE 1 sfsis[s[sis[sis us 
SOIEER 59 RA SOSE 5 
aa 7 SEE SIEB FE 
SEE EEE 1 A 34 
HOISEERA 62 Ra 72 BER 
Einiolsteisizin Be SEHEN uam 5 
A aan © 
BB Eteisiztaiztei We 
ZEICHENSATZ 1 
ZEICHEN NR. 34 ZEICHENSATZ 1 
ZEICHEH HR. 5 ZEICHEHNSATZ 1 
aanaanad ZEICHEN HR. 65 
BER BEER 
RE 1 SEELE 25 DH 2 
SEE 5 AO © eich en 
u 34 DIEEBEBSN 127 f 122 
San 22 SIEREEERE 127 5 ig 
Eure 25 BEREIT 2 {1 2 
AERAOR © EEE 52 = 2 
Ststsfsfefeisiahg 
ZEICHENSATZ 1 EEICHENSATZ 2 ZEICHEHSATT > 
ZEICHEN HR. ®1 eEICHEN HR. 1 SEICHEN NR. 1 
Ei 6 
ee 5 
en 68 ek 
AIR 2 55 &e EB 
Aue a 2 
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HEUE RLPFHAEBETE ZRAUEBERMH 


Eigene Zeichen „im Character —rRRAn 


POZNT RE 
NEE 
ORUIDEE gg 





Wie Sie der Tabelle entnehmen können, kann man den VC 20 auch 
im RAM-Bereich zwischen 4896 und 8191 nach der Form von 
Buchstaben fragen lassen. Leider gehört der normale Zeichen- 
satz zum ROM, so daß man nicht einfach dort ein paar unwichtige 
Zeichen z.B. durch Umlaute oder griechische Buchstaben ersetzen 
kann. Man kann aber etwas fast ebenso Gutes tun: eigene 

Zeichen festlegen (im RAM) und trotzdem immerhin noch alle 
nicht-reversen Zeichen weiterverwenden. Wenn man mit 64 neuen 
Zeichen auskommt, geht das einfach mit POKE 36869,255. 


Nehmen wir nun an, Sie wollen ein eigenes Zeichen bauen, das 
in einem bei 7168 beginnenden Zeichensatz die Nr. 5 haben 
soll. Zeichnen Sie zunächst seine Form in ein kariertes 
Schema und betrachten Sie die 8 einzelnen waagerechten 
Streifen: Die 8 Felder nebeneinander haben von links nach 
rechts die Werte 128 64 32 16 8 4 2 1. 

Für jeden gesetzten Punkt addieren Sie die entsprechende 
Zahl (anders gesagt: Betrachten Sie die gesetzten Punkte 

in einer waagerechten Reihe als Einsen in einer Binärzahl). 
Auf diese Weise erhalten Sie für jede "Zeile" eine Zahl 
zwischen ® und 255. Nehmen wir als Beispiel das biologische 
oder astronomische Symbol AR: 


XXXX daBdallll = 15 

xx BaanRBII = 3 

xx BBaBBIBI = 5 

XXXX X d1111801 =12]I 

X x lgpaıoda =136 
X x ldaaıaedd =136 
XXX aıllıdaaddd =112 

Dnonnnned = 8 


18 POKE 36869,255 

20 DATA 15,3,5,121,136,136,112,® 

38 FOR I=8 TO 7:READ A:POKE 7168+5*8+1,A:NEXT 
Jetzt können Sie dieses neue Zeichen mit der Taste E 
schreiben (denn E hat normalerweise die Bildschirmcode- 
nummer 5) . Für ein normales E müssen Sie nun CONTROL REVERSE 
ON drücken und dann das E. 


Mit POKE können Sie die neuen Zeichen auch in den Bildschirm 
setzen (vergessen Sie dabei das Farb-RAM nicht !). Mit 
POKE 7680+3+7*22,5:POKE38400+3+7*22,2 
setzen Sie das neue Zeichen in Rot in Spalte Nr.3 und 
Zeile Nr.7 (beide Numerierungen mit ® links oben angefangen !). 
Wenn Sie ein normales E mit POKE schreiben wollen, müssen 
Sie zur gewöhnlichen Nummer 5 noch 128 addieren, also: 
POKE 4:=133 USW. 


Sie können auch mit PEEK fertige Zeichen aus dem normalen 
Zeichensatz holen, ins RAM setzen und dann mit Änderungen 
verzieren, z.B. Umlautpünktchen oder Akzente einbauen. 
Mathematische Sonderzeichen, griechische oder russische 
Buchstaben sind nun auch kein Problem mehr. 


<OOS 
Bu 


u 
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Sro=3sS5E FRRHö5ELEI 


IHM HKLEIHNEM SPEICHER 


Es ist Ihnen vielleicht aufgefallen, daß die beiden Hälften 
des Inhaltes von 36869 das Video-RAM und den Zeichensatz 
(sofern er nicht im ROM abgefragt wird, also hinter 32768) 
in dem gleichen Bereich zwischen 4896 und 8191 hin- und 
herschiebt: Das ist ja gerade der Standard-Speicher, der 
auch im nicht-erweiterten VC 20 vorhanden ist.Sie können 
nun das Video-RAM in jedes halbe Kilobyte dieses Bereiches 
legen (8 Möglichkeiten), und das sogar mitten im Programm 
sehr plötzlich ändern und damit ganze Bildschirmseiten 
austauschen. Andererseits können Sie auch Ihre selbstgemachten 
Zeichen nur hier unterbringen, maximal 256 Stück, was 2948 
Speicherplätze (Bytes) belegen kann. Dieser Bereich darf 
durchaus mit dem Video-RAM überlappen, wenn Sie den ent- 
sprechenden Teil des Zeichensatzes nicht verwenden (z.B. 
bei POKE 36869,255 die REVERSE-OFF-Zeichen mit SHIFT, also 
die Nummern 64 bis 127). 
Ein anderes Problem besteht darin, daß ja auch das BASIC- 
Programm hier angesiedelt ist: es beginnt bei 4896 (ohne 
jede Erweiterung) bzw. bei 1824 (bei genau 3 kB-Erweiterung, 
z.B. Super-Expander) und endet in diesen beiden Fällen vor 
dem Video-RAM, also bei 7679. Wenn es kurz ist, brauchte 
einen das wenig zu stören, wenn es nicht für die String-Ver- 
arbeitung auch das Ende mit den hohen Nummern benutzte. 
In den Speicherplätzen 56 und 52 steht, wo BASIC aufhören 
muß und wo die Strings (rückwärtsschreitend) angesiedelt 
werden dürfen. Der Inhalt dieser Plätze ist normalerweise 
30, das bedeutet 3@*256, also 7688. Wenn Sie nun z.B. ab 
5128 Video-RAM und Zeichenformen unterbringen wollen, 
müssen Sie (wegen 5128/256=28) ins Programm schreiben: 

10 POKE 56,2@:POKE 52,28 
damit der Bereich ab 512@ vor BASIC geschützt wird. 
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GSLEITEHDE ZIFFERH 


Mit unserem Wissen über die Speicherung des Zeichensatzes 
können wir einen kleinen Gag machen, der bei Zählwerken, 
wie sie in Mondlandeprogrammen etc. vorkommen, etwas zur 
Verblüffung der BASIC-kundigen Zuschauer beitragen kann: 
Durch ein Fenster läuft scheinbar eine Ziffernscheibe von 
oben nach unten durch; das Tempo ist mit den Zifferntasten 


veränderbar: 


5 REM ZAEHLNERK 


D 
18 FOR I=9 TO 72:FOR J=a TO 7 

25 K=I+T:IF K573 THEN K=k-56 

23 A=PEERKLEI1S+40#S+E) 

44 FÜHE Bl4d+I45+ 1. A: HEAT:HERT 

59 FRIHT "M":POKE 236269, 254: POKESE. 24 

SA L=L+1:IF L>79 THEN L=8 

51 M=h+1/ia: IF Mesa THEN Mesa 

8 LL=L+5:IF LL>?3 THEH LL=LL-368 

1 MAeM+a: IF MM>=Sa THEH MMeri-20 

23 FOEE 7630+220,1:FOKE324RAE4259, 2 

31 FOEE 7659+243, M: POKEZE4UA+24F, € 

aa FOKE YE2B+250+22,LL:PÜKE3340A+250+22. 2 
31 PÜKE YEBE+243+22. MM: FOHES24BBHZ4IH 22. & 
123 GET T$: IF TE2"" THEN Te2te3-"ALETERS 
115 FÜR I=5 TO T:HEHT:GOTO 68 


Ne 
Ss 


Geben Sie zunächst nur die auf Zeilen ein, deren Nummern 
auf 8 enden. Nach dem Start mit RUN (Return) müssen Sie 
etwas warten. Zweistellige Zahlen, deren Ziffern ver- 
schieden schnell] laufen, erhalten Sie mit dem vollständi- 
gen Programm. Sind die Zeilen 19 bis 48 einmal gelaufen, 
genügt das Starten mit RUN 59 (Return), es spart Zeit. 
Das Tempo für die abrollenden Ziffern können Sie mit den 


Zifferntasten @ bis 9 bestimmen (während des Laufs). 


Der Trick besteht also (wie Sie im Programm nachrechnen 
können) darin, daß 88 verschiedene Teilstücke aus dem 
Speicherbereich, der die Formen der Ziffern Q bis 9 fest- 
legt, herausgeschnitten und als Ziffern benutzt werden, 
die dann meistens aus dem Unterteil der einen und dem 
Oberteil einer benachbarten Ziffer »estehen, Damit man 

es trotzdem noch lesen kann, werden stets zwei überein- 


ander geschrieben. 
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WEHIGER SPRALTEH. MENIGER ZEILEHN 


Sicher sind auch Sie der Meinung, daß 22 Spalten und 23 
Zeilen gerade wenig genug ist. Wozu also diese Zahlen noch 
kleiner wählen ? Wenn Sie die Grafik des Super-Expander 
einschalten, fällt Ihnen sicher auf, daß das Bild etwas 
kleiner wird, der Rand also (noch) breiter. Schreiben Sie 
mit CHAR ins Bild, so haben Sie nur 20 Zeilen und 20 
Spalten zur Verfügung. Der Grund ist der folgende: Für 

die Feingrafik müssen alle Punkte des Bildschirms einzeln 
als Bit irgendwo gespeichert sein. Der VC 20 macht das mit 
dem Zeichensatz im RAM, wo aber auch noch das Video-RAM 
(ein halbes kB) untergebracht werden muß. Es bleiben also 
maximal 3,5 kB übrig. 23 x 22 x 64 ist aber mehr als 8 x 3584, 
so daß es so nicht geht. Mit 20 x 20 geht es aber: Das 
sind genau 3200 Bytes, so daß noch etwas übrigbleibt (wofür 
es eine sehr trickreiche Verwendung gibt: Schnelle 
Einbauten in fertige Grafikbilder :vgl. S. 119!) 





Der Speicherplatz 36866 enthält die Summe aus der evt]. 
vorhandenen 128 (die Video- und Farb-RAM um 512 Plätze 
verschiebt und normalerweise gesetzt ist) und der Anzahl 
der Spalten, also 22 oder 20. Der darauffolgende Platz 

Nr. 36867 enthält das Doppelte der Zeilenzahl (23 oder 
z.B. 20), dazu evtl. noch eine 128 und etwas sehr Interes- 
santes: das niedrigste Bit, die Eins. Dieses Bit entscheidet 
darüber, ob im Zeichensatz je 8 Bytes zusammen als ein 
Zeichen aufgefaßt werden (keine Eins) oder je 16 Bytes 
(Eins gesetzt). Setzen Sie POKE 36867,47 und tippen Sie 
einige Buchstaben: Statt des Klammeraffen erscheint der 
Klammeraffe mit einem A darunter, statt des A übereinander 
ein B und ein C usw. 


DAS IST JA 5RÜOTE=SH | 


Etrısa= bD© SHere- Buchstaben 


Wenn Sie sich gelegentlich ärgern, daß man die Schrift aus 
größerer Entfernung nicht gut lesen kann, hilft Ihnen viel- 
leicht dieses Programm: 


35 EEM GROTESK-SCHRIFT 

31: 

155 DIM Aclz>: FOR I=sö TO 11:READ ACICHERT 

la DATA 9.8,1,2,3,2.4,9,6,5,7,7 

25 FÜR I=ä TO 127:FRIMT I 

135 FOR I=5 TD 7: BXT:=PEEKCEZrISHZ2A4E+SE TH TI HEHT 
i4a FÜR K=5 TO 11:POKE SI28+15#I+K. BERCED SC HEHT 
139 FÜR K=12 TO 15:PÜKE S12+H15#I+K,9:HEST: NEST 
2439 PÜKE 265659.253:PÜKE 363657 ,31:PÜKE36E865, 25 


Wenn Sie eine 3-kB-Erweiterung (z.B. Super-Expander) benutzen, 
können Sie statt der 5128 auch 4A96 nehmen (in Zeilen 148 und 
150), in 2808 muß es dann heißen POKE 36869,252, und in Zeile 
128 können Sie dann bis 223 laufen. 


Das Programm nimmt einen wesentlichen Teil des normalen Zeichen- 


satzes (und zwar des zweiten; wenn Sie in Zeile 138 die 2848 





weglassen: des ersten) und setzt ihn in das RAM. Von den 8 
Mini-Zeilen, aus denen jedes Zeichen besteht, werden dabei 4 
doppelt genommen (und zwar abgestimmt auf gute Lesbarkeit der 
Großbuchstaben), und es werden unten 4 leere zugefügt als 
"Durchschuß" (Zeilenabstand). Trotz des vergrößerten Bild- 
schirms läuft der Cursor nach unten aus dem Bild heraus. Man 
muß ihn, um das Bild hochzuschieben, im Unsichtbaren anstoßen 
lassen und dann zurückholen; außerdem sieht er etwas ramponiert 
aus (weil er jetzt Nonsens als Form bekommt). Sie können in 
diesem Modus Programme schreiben (ohne Erweiterung allerdings 
nur kurze), Sie verlassen ihn mit STOP & RESTORE-Tasten, Sie 
können ihn mit GOTO 288 schnell wieder einschalten. 


Wenn Sie die Buchstabenhöhe nur einfach verdoppeln wollen, ohne 
Zwischenraum zu Schaffen, ist das Programm noch etwas einfacher. 
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FEIHGRAFIK HAUSGEMRCEHT 


Diese Umschaltung auf Buchstaben der doppelten Höhe, die 
dann aus je 16 Bytes zusammengebaut werden, ist offenbar 

in Verbindung mit den fertigen Buchstabe aus dem ROM 
ziemlich sinnlos. Wozu mag sie gut sein ? 

Wir hatten schon festgestellt, daß wir für einen etwas 
eingeschränkten Bildschirm 3200 Bytes brauchen. Es wäre 

nun schön, wenn man dem Computer einfach sagen könnte: 

An dieser und jener Stelle stehen diese Bytes, und er 

soll sie ständig auf den Bildschirm setzen. Der Computer 
ist aber in erster Linie für Buchstaben konzipiert; die 
Grafik ergibt sich sozusagen als Abfallprodukt und ist 
darum gelegentlich etwas komplizierter. Tatsächlich muß 

man die Feingrafik aus Buchstaben zusammensetzen. Wenn 

man jedes einzelne Pünktchen unabhängig von jedem anderen 
setzen will, wären das bei 8x8 Pünktchen pro Zeichen 

„64 verschiedene Zeichen, die man sich auf Vorrat legen 
müßte, eine ziemlich schwer vorstellbare Zahl. (Vielleicht 
kennen Sie die Legende vom Schachbrett und den Reiskörnern: 
auf das erste Feld sollte ein Korn, aus das zweite 2, dann 
4, und immer das doppelte: es ist insgesamt gerade diese 
Zahl von Reiskörnern .) Zum Glück können aber ohnehin nur 586 
Zeichen zur Anwendung kommen, weil der Bildschirm dann voll 
ist. Man wird also gar nicht alle möglichen Zeichen auf 
Vorrat legen, sondern die Zeichen herstellen, die gerade 
benötigt werden. Nun kann jedes Zeichen nur mit einem Byte 
(das dann im Video-RAM stehen muß) ausgewählt werden, die 
Auswahl geht also nur von @ bis 255. Urdnun kommen unsere 
doppelt-hohen Zeichen zum Zuge: Statt 20 normalen Zeilen 

zu je 20 normalen Zeichen nehmen wir 10 doppelt-hohe Zeilen 
aus je 20 Zeichen. Dann kommen wir mit 288 Zeichen aus, die 
bequem vom Video-RAM aus angewählt werden können. Da sie 
jeweils 16 Byte zur Festlegung ihres Aussehens brauchen, 
macht das gerade wieder 3268 Bytes. 
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Wir legen sie auf die Plätze ab 4896 und lassen das 
Video-RAM an seinem gewohnten Platz, ab 76880. Nach unseren 
Tabellen muß darum in den Speicherplatz 36869 die Zahl 
240+12, also 252. In die Nr. 36866 kommt zum einen die 
128 wegen der Wahl des Video-RAM und zum anderen die 
Zahl der Spalten, 20, zusammen also 148. In den Platz 
36867 kommt die verdoppelte Anzahl der Zeilen 2x 10, und 
wegen der Wahl der doppelt hohen Zeichen noch eine |, 
zusammen also 21. Damit das BASIC uns nicht ins Gehege 
kommt, schränken wir es auf den Bereich unter 4996 ein 
und verwenden die 3 kB-Erweiterung. In die Plätze 56 
und 52 kommt also jeweils eine 16(da 49096/256 = 16 ist): 

18 POKE 36869,252:POKE 36866,148: 

POKE 36867,2]1 :POKE 52,16:POKE 56,16 


Wir machen nun alle 2@® Zeichen erst einmal zu Leerzeichen: 

28 FOR I=® TO 3199:POKE 4096+1,@:NEXT 
und schreiben sie spaltenweise auf den Bildschirm: 

38 FOR I=ß TO 19:FOR J=ß TO 9 

40 POKE 7680+1+20*J, I*1@+J:NEXT:NEXT 
Den Farbspeicher füllen wir zum Beispiel mit Rot: 

50 FOR I=@ TO 199:POKE 384@8+1,2:NEXT 
Jetzt haben wir einen leeren Bildschirm, aber keinen 
gewöhnlichen leeren, sondern einen, für den die Feingrafik 
nur noch in die 3200 Plätze geschrieben werden muß. Wenn 
Sie in Zeile 190 vorübergehend POKE 36869,248 schreiben 
und die übrigen POKE-Anweisungen so lassen, sehen Sie, 
daß auf dem Schirm 4988 Zeichen, spaltenweise nach auf- 
steigenden Zeichennummern, stehen, zumindest scheinbar, 
denn wir haben sie ja zu 2@® doppelt hohen Zeichen um- 
frisiert. Außerdem sehen in unserem privaten Zeichensatz 
(im RAM) alle Zeichen vorläufig wie Leerzeichen aus (wenn 
Sie wieder zu POKE 36869,252 zurückkehren). 


Mit diesem Programmtei] haben wir erreicht, daß der Bild- 
schirm aus 2 senkrechten Streifen besteht, deren Inhalte 
Jeweils von oben nach unten fortlaufend im "privaten" 
Zeichensatz stehen: 
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@ 20 Grobspalten ——y 


er Punkte \ 


4896+1*160 










4996+19*160 
+] 
+2 


er 
+16 


+159 3159| ____L_____ sl 





Damit wir uns leichter verständigen, nennen wir die 20 
Streifen "Grobspalten"; sie bestehen aus je 8 Feinspalten, 
das ganze Bild also aus 16@ Feinspalten. Entsprechend gibt 
es 18 Grobzeilen aus je 16 Feinzeilen, also auch 16® ins- 
gesamt. Im Speicherplatz 4096 steht nun, wie es in der 
obersten Feinzeile der ganz linken Grobspalte aussieht, 

im nächsten Platz 4097, wie es in der zweitobersten aussieht 
usw. Bei 4896+15 ist der erste "Buchstabe" fertig, aber 

da wir den nächsten (Nr. 1) gleich darunter (und nicht 
etwa daneben, was umständlicher wäre für das Folgende) 
geschrieben haben, geht es unmittelbar darunter weiter, 
und zwar bis zum unteren Bildrand, 4896+159. Dann geht 

es weiter mit der zweiten Grobspalte. 


wollen wir nun einen bestimmten Punkt in den bisher noch 
leeren Bildschirm setzen und zählen seine Koordinaten 
X von links (B) bis rechts (159) und Y von oben (B) bis 
unten (159), so müssen wir erst einmal die Grobspalte, 
bestimmen: 69 XG=INT(X/8):XF=X-8*XG 
Den Rest XF, die Feinspalte innerhalb der Grobspalte, 
brauchen wir natürlich auch. Die Adresse des Speicher- 
platzes, in die wir unseren Punkt schreiben müssen, wird 
nun so berechnet: 

78 AD=4096+160*XG+Y 
denn jeweils 16 Plätze entsprechen einer Grobspalte nach 
rechts; die Feinzeilen werden dagegen einfach von oben 
nach unten durchnumeriert. Was muß nun in diesen Platz 


eingefüllt werden ? Natürlich ein Byte, also 8 Bit, von 


03 


denen jedes einen kleinen Punkt bedeutet. Soll also ein 

Punkt gezeichnet werden, so muß ein Bit auf Eins gesetzt 

werden, unabhängig davon, ob es schon vorher Eins war, 

und auch unabhängig von den anderen Bits in diesem Byte. 

Welches Bit das sein muß, hängt natürlich von XF ab, also 

dem feinen Rest der X-Koordinate, der mit der Wahl der 

Grobspalte noch nicht erledigt ist. Die Zuordnung ist 

also wie bei Binärzahlen üblich: 
128 64 32216 8 4 2 


1 = Summand für 
{F = 13234567 


(Mehr als 7 kann ja nicht als Rest herauskommen, wenn man 
durch 8 geteilt hat). Die Zuordnung läßt sich etwas 
eleganter schreiben: 

80 BN=2T(7-XF) 
(Rechnen Sie es bitte nach !) M 
Falls nun schon etwas in dem Byte steht, soll es natürlich 
nicht gelöscht werden: Mit OR (dem nichtausschließenden ODER) 
werden alter (BA) und neu hinzukommender (BN) Inhalt über- 


lagert: 


98 BA=PEEK(AD) 
108 POKE AD,BA OR BN 


Wenn Sie nun eine ganze Kurve sehen wollen, bauen Sie die 
Zeichenanweisung in eine Schleife ein, etwa: 
55 FOR X=@ TO 159: Y=80+70*SIN(X/18) 


110 NEXT 
128 GOTO 128 


‚Ist da schon ein. Pünkt 7 


Das geht sehr einfach: Die Adresse AD und die Größe BN 
werden wie zuvor bestimmt; dann wird abgefragt, ob(PEEK(AD) 
AND BN)= BN ist oder nicht (die Klammer ist hier sehr 
wichtig, da AND sonst schwächer bindet als =. 
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Kann man auch einen Punkt löschen ? 


Eine mögliche Strategie besteht darin, abzufragen, ob der 
Punkt gesetzt ist (siehe oben), und ihn (aber nur dann !) 
durch Subtraktion zu entfernen: 

POKE AD,BA-BN 


Etwas waidgerechter geht es mit 

POKE AD,BA AND (255-BN) 
denn wenn man von 255 (=11111111) BN subtrahiert, bleibt 
gerade überall eine ] stehen, außer an der Stelle des 
zu löschenden Punktes. Das ANDen mit dem alten Inhalt 
läßt den alten Inhalt bis auf den zu löschenden Punkt stehen. 


Und invertieren ? 


Damit ist gemeint, daß an der betreffenden Stelle ein evt]. 
vorhandener Punkt gelöscht, sonst aber ein neuer gesetzt 
wird. Fragen Sie einfach ab, ob der Punkt gesetzt ist 

und verzweigen Sie dann entweder zum Setzen oder Löschen. 


Linienziehen 


Setzen Sie die Prozedur zum Zeichnen eines Punktes in 
eine FOR...NEXT-Schleife. Je nach gewählter Sprungweite 
können Sie dann durchgezogene oder gestrichelte Linien 
ziehen und auf Wunsch auch noch abfragen, ob eine Schon 
vorhandene Linie (oder Punkt) dabei geschnitten wird. 


Am besten machen Sie die Schrittweiten für X und Y davon 
abhängig, wie steil die Gerade ist: So können Sie ohne 
unnötige Verlangsamung eine dicht geschlossene Linie ziehen. 


Das Ziehen von Linien in Feingrafik mit BASIC läuft trotzdem 
allerdings ziemlich langsam. Hier lohnt sich (spätestens) 
ein Maschinenprogramm. Mit dem Superexpander steht es 

unter der BASIC-Anweisung DRAW zur Verfügung. 
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Zentrierung des Bildschirms 


Wenn die Anzahl der Zeilen und Spalten verändert ist, 
möchte ein Ästhet das Bild wieder in die Mitte rücken. 
Dazu gibt es zwei Speicherplätze: 
Platz Nr. TUR 22 %..23 
(Spalten) 36864 
(Zeilen) 26865 







für 20 x 20 
14 
43 











Für die Feingrafik schreibt man also ins Programm: 
POKE 36864,14:POKE 36865,43 


HOcH ETWAS FRFFIHNIERTER: 


mit si vıer  ıucheinmnbar-ev 


u 


DLıosrFrFrelbeor les 


Das folgende Grafikprogramm erzeugt ein annähernd quadra- 
tsiches Bild aus 136 x 224 = 30464 Punkten, also deutlich 
mehr als den 160 x 160 Punkten, wie sie auch der Super-Ex- 
pander liefert (nämlich 160 x 160 = 25600) und fast so viele, 
wie der volle Bildschirm benutzt (aber dann nicht einzeln 
setzt). Das Programm benötigt 3 kB Erweiterung und nutzt 
den Kernbereich des Speichers von 4096 bis 8191 fast ganz 
aus. Dazu dient ein besonderer Trick: Sowohl das Video- 
RAM als auch der Zeichensatz beginnen formal bei 4096, aber 
die Zeichen Nr. £& bis 15 werden nicht benutzt: Wo’ ihr Aus- 
sehen registriert ist, kann nun das Video-Ram sitzen. Der 


Trick äußert sich einfach in der Anweisung POKE 36869,294. 


Man kann nun 240 Bereiche (aus je &x 16 Punkten) fast belie- 
big in Zeilen und Spalten aufteilen, wobei die unterschied- 
lichen Maßstäbe für beides zu beachten sind. Im hier wieder- 
gegebenen Beispiel sind es 17 Spalten (zu je 8 Punkten) und 
14 Zeilen (zu je 16 Punkten). Die Laufindices im Programm 
gehen jeweils von ® bis zu der um ] kleineren Zahl. 


ml a a 


“diesen Trick verdanke ich Herrn R. Hecker, Duisburg 
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5 REM GRAFIK 224 X 136 PUNKTE MIT TEXT 
32 REM MIT 3 KB ERWEITERUNG 


43: 

98 REM VRRBEREITUHG 

33: 

158 POÜKE 36869, 2084:POKE S5.165:POKE 55.8 
1655 PÜKE3ESE4, 165: PIIKE35365, 30 

115 POKE36356, 17:FOKE36367, 2 

128 FOR I=8 TO 16:FOR J=8 TO 123:POKE 4096+J#17+1., 16+J+1%14:NEAT:NEAT 
125 FÜR I=8 TO 17%#14-1:POKE 37888+1,6:NEAT 
128 FÜRI=256 TU 4695:POKE 4835+1.%:NEXT 
1239 : 

181 REM SPIRALE ALS BEISPIEL 

182 : 

198 A$="LOGSARITHMISCHE" :ZE=3:5P=9:605UB 499 
135 A$="SPIRALE":ZE=14:SP=4:GOSUB 458 

238 R=65 

218 #=68+REC0OSCH) : Yal12+R#1.5SESIHCH) 

223 GOSUB 38 

238 W=ebl+.83:R=R#.393:50TD 21B 

243 GOTD 248 

237 : 

2933 REM GREAFIK-RÜOUTINE 

233 : 

358 AG=INTCA/SI :RF=INTCK-BEXG) 

318 Ab=4u936+2I6+46#14415+Y 

328 FA=PEEKKAD) 

328 PN=2tC7-KF) 

348 POKE AD,PH OR PA 

358 RETURN 

397: 

3933 REM TER®TEIHEBLENDUHG 

3933 : 

459 FOR I=si TO LEHCAFI:FORJ=B TO 7 

418 CH=(CRSCCHMIDESCAF, LT, 199-549) 42+2 115+J 

428 FPÜKE 4H3E+r256+C5SF+ ID I)A14#15+ZE+T, PEEKCCH) 
433 NEZT:HEXT:RETUFH 


Als weitere Besonderheit ahmt das Programm die CHAR-Anwei- 
sung des Superexpanders nach: Es schreibt Texte ins Bild. 

Im Hauptprogramm werden Texte als A$ definiert und Zeilen 
und Spalten für den Startpunkt (linke obere Ecke des Textes) 
gewählt; das Unterprogramm holt dann die Buchstaben der 
Reihe nach aus dem Character-ROM (das bei 2?T16 = 32768 be- 
ginnt). Dabei kann die Höhe in Achteln der Buchstabengröße 
festgelegt werden (ZE ist also das 8-fache der normalen 
Zeilennummer, sinnvollerweise aber besser das 10- oder 12- 
fache oder ähnlich: Der Zwischenraum zwischen den Zeilen 


wird damit in feinen Stufen wählbar !) 
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It. HH IM EUHMT 


Feinz PFunrkte, zrob koloriert 


Damit ist hier gemeint, daß 160 x 160 Punkte gesetzt und 
dabei 10 x 20 Felder einzeln auf 8 verschiedene "Tinten-" 
Farben gesetzt werden können (bei gleicher "Papierfarbe", 
die aus 16 möglichen ausgewählt wird). Wie man die feinen 
Punkte setzt, haben wir gerade behandelt. Die Farben der 
200 Felder werden natürlich in das Farb-RAM geschrieben, 
also zeilenweise ab 38408 (bzw. bei Umschaltung ab 37888). 
Da diese Farbblöcke ziemlich grob sind, hat es wenig Sinn, 
mehrere Kurven, die sich kreuzen, auf verschiedene Farben 
zu setzen (dazu ist der Multicolor-Modus besser). Es kann 
aber sinnvoll sein, mehrere Kurven vertikal oder horizontal 
nebeneinander in verschiedenen Farben darzustellen. Dazu 
belegt man ganze Zeilen oder größere Rechtecke des Bild- 
schirms mit einheitlichen Farben (mit Hilfe von zwei 
geschachtelten FOR-Schleifen im allgemeinen). 


Die Papier- und Rahmenfarbe POKE.. 36879... 


Dieser Speicherplatz hat es wieder einmal in sich. Seine 
8 Bit sind auf drei verschiedene Zahlen aufgeteilt, die 
aber alle etwas mit den Farben zu tun haben. Die oberen 4 
(also die Vielfachen von 16) geben die "Papierfarbe" als 


Auswahl von 16 Möglichkeiten an: 


0 d Schwarz 8 128 Orange 

I. 36 Weiß 9 7144 Hell-Orange 
2 32 Rot 18 168 Hell-Rot 
348 Cyan II 176 Hell-Cyan 
464 Magenta 12 192 Hell-Magenta 
5 89 Grün 13 288 Hell-Grün 

b 96 Blau 14 224 Hel]l-Blau 
12 Gelb 15 248 Hell-Gelb 


Dazu ist dann noch 8 zu addieren, wenn die Darstellung 
nicht revers erfolgen soll (andernfalls tauschen "Papier" 
und "Tinte" ihre Farben), und die Kenn-Ziffer der Rahmen- 
Farbe (@ nbis 7 nach der gleichen Liste). Beachten 

Sie bitte, daß die Zuordnung der Farben auf den Tasten 
gerade um eine Ziffer von den Ziffern auf den gleichen 
Tasten abweicht !) 
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ELIHTE FRREEH, FEIMYERTEILT 


Piiııltı — ou Leon” . zelbet3en acht. 


Wenn eine grüne Kurve eine rote Kurve kreuzen soll, ohne 

daß zentimeterweit die eine auf die andere abfärbt, wählt 
man den Multicolor-Modus. Dieser ermöglicht eine Feingrafik 
mit 88 Spalten und 168 Zeilen, also 128@@ Punkten, die 
unabhängig voneinander vier verschiedene Farben haben 
können. Drei von diesen Farben sind für den ganzen Bildschirm 
einheitlich vorzuwählen, die vierte kann in jedem von 2 
Feldern einzeln gewählt werden. Ebenso kann auch jedes dieser 
2808 Felder einzeln in die feinere einfarbige Grafik (man 
sollte besser sagen: zweifarbige) umschalten. 

Diese Umschaltung geschieht mit den Bits im Farb-RAM, die 
den Wert 8 bedeuten. Ist FA eine Adresse im Farb-RAM 

(also irgendwo zwischen 37888 und 38911), so kommt es auf 
PEEK(FA) AND 8 an: Ist das =8, so ist für das zugehörige 
Feld des Bildschirms Multicolor, sonst Feingrafik angesagt. 


Die niedrigsten 3 Bits (also PEEK(FA) AND 7) geben die "Tinten-" 
Farbe an, die 8 Möglichkeiten hat. Man sollte die Inhalte 

des Farb-RAMsS nie abfragen, ohne sie mit AND zu verknüpfen, 

da ihre nicht vorhandenen höheren Bits Nonsens liefern 

und damit auch bei Gleichheit Ungleichheit vortäuschen können. 


wo stehen nun die vier Farben ? Zwei davon kennen Sie schon: 
die "Papier-" und die "Rahmen-"Farbe in 36879; sie bekommen 
die Nummern ® und ], genauer: @® und ®1. Die Nummer 2 oder 
18 ist die "Tinten-"Farbe, die im Video-RAM für die einzelnen 
Felder (z.B. Buchstaben) einzeln festgelegt werden muß 
(notfalls FOR-Schleife mit POKE-Anweisung). Nun bleibt noch 
die Nr. 3 oder ]1 übrig. Sie steht in 36868 in den höheren 
vier Bits (in den unteren steht erstaunlicherweise die Laut- 
stärke für die Musik !) und hat 16 Werte zur Auswahl (Tabelle 
wie gehabt). Wollen Sie diese Farbe festlegen, ohne die 
Lautstärke zu ändern, schreiben Sie: 

POKE 36878,F3*]6+PEEK(36878) AND 15) und 
um sie zu lesen: (PEEK(36878)AND 248)/16 


Jetzt haben wir also 4 Farben festgelegt mit den Nummern 

0, @1, 18 und I1. Teilen Sie nun das Buchstabenfeld in 

4 x 8 Plätze ein (4 Spalten, 8 Zeilen), schreiben Sie 

auf jeden Platz die zweistellige Binärzahl für die gewünschte 
Farbe und berechnen Sie daraus die 8 Bytes für ein 
buchstabengroßes Bildchen. 


Multicolor mit Koordinaten 


Was muß man anders machen, wenn man die Multicolor- 
Grafik mit Koordinaten betreiben will ? Lassen wir 
X jetzt (entsprechend der wirklichen Auflösung) von ® 


bis 79 laufen und trennen wir es in einen Grobanteil XG= 
INT(X/4) und einen Feinanteil XF=INT(X)-4*XG auf. Y 

läuft natürlich nach wie vor von ® bis 159. Was in die 
Bytes (deren Adressen sich so berechnen wie zuvor), 
geschrieben werden muß, ist nun das @-, 1I-, 2- bzw. 3-fache 
von BN=2T(6-2*XF), je nach der gewünschten Farbe 

von den vier vorgewählten. 


In der Feingrafik hatten wir das schon vorhandene Bild 
einfach punktweise mit OR ergänzt. Hier geht das nicht 

ganz so einfach, weil ja nicht einzelne Bits, sondern 

immer Bit-Paare ausgetauscht werden müssen. Der alte Inhalt 
BA=-PEEK(AD) bezeichnet die Farben für vier nebeneinander- 
liegende Punkte, von denen drei bleiben und einer neu 
gesetzt werden sollen. In der Zahl 2T(6-2*XF)*3 sitzen 
genau an diesen Stellen Einsen, sonst Nullen, in der Zahl 255 
- 3”*BN ist es genau umgekehrt. Verknüpft man diese und BA 
mit AND, so bleiben die drei alten; der Platz für die 

neuen wird gelöscht. 


Beispiel: Der alte Inhalt BA=PEEK(AD) sei QB11Q101, XF sei 
2. Dann ist BN=2 (6-2*XF) = 4 = BdgnnBIRR, das Dreifache 
davon BBBglınn = 12, 255-12 = 243 = 11118811. 

BA AND 3*BN ist dann GB110801, die beiden unterstrichenen 
Bits sind also gelöscht, wie es ja auch sein soll. 
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Das folgende Programm zeichnet 3 Sinuskurven in drei 
verschiedenen Farben, wobei das Zeichnen der einzelnen 
Punkte im Unterprogramm stattfindet: 


I REM MULTICOLÄR HAUSGEMACHT 
5 : 


18 PÜKE 52.16: POKE 56,16:FÜKE 38924. 14:POKE 35865. 43 
24 PÜKE 385365,148:PÜKE 365367 ,21:FOKE3SESE9. 252 
33 POKE 36873,123:FÜKE 26379,27 


453 FOR I=5 TO 193:FÜOR J=6 TO 3 
3 FOKE FEE3+ I+20#&T, IE1A+T: HEAT:HEAT 


&3 FOR I=sfi TD 139:FOKE 334BE+1,5:HEAT 

ra FOR I=3 TO 3133:FOEE d696s+1.9:HEAT 

I. 

149 FÜR A=3 TD 25 STEF „12 

119 FÜR JI=9 TO 2 

124 TeBg-FORSINCHFLDHSRN F=1+1:50SUB 559 :NEXT: HET 
1:3 G0TD 136 

135 : 

39 AG=IHTCA/4I:AF=SINTER)-I4EHG 

18 AD=4395+1E0#45+7: EA=PEEHECADD 


328 EN=S2TLE-I#AF2:FOKE AD, EA ANHDE2SS-EHE3DD+EN#F 
>23 FETURH 


Zeilen 18 bis 78 sind die diversen Vorbereitungen auf die 
Multicolor - Grafik, das Unterprogramm ab 509 die Ausführung. 
Das eigentliche Hauptprogramm (das Sie jetzt durch phantasie- 
vollere ersetzen können) ist die Doppelschleife von 1ßß bis 
130. Wenn Sie dieses Programm Schritt für Schritt auch 
einmal "zu Fuß" durchrechnen, so kennen Sie die Multicolor 
ziemlich gründlich. 


f o® 





INHD HUH DAS GANZE AUTOMKHTISCH 


Grafik mit Jem Surer— Ex<rfandernr 


Nachdem Sie nun gelernt haben, wie man ein Segelschiff 
benutzt, verwenden wir ein Motorboot, bildlich gesprochen. 
Wir machen uns die Sache mit der Grafik viel bequemer und 
benutzen den Super-Expander. Trotzdem werden uns die 
Kenntnisse, wie man das mit BASIC "zu Fuß" macht, hier 

zu weiteren Tricks (und natürlich zu einem besseren Ver- 
ständnis) helfen. 


Da Sie zu dem Super-Expander auch eine Gebrauchsanleitung 
haben, brauchen wir hier nicht alles abzudrucken. Die 
nützlichsten Anweisungen sind POINT und DRAW,gelegentlich 
auch CIRCLE (wenn es nicht so genau darauf ankommt; vor 
allem für kleine Kringel als etwas größere Punkte eignet 
sich CIRCLE gut, für große Kreise leider nicht: sie werden 
immer etwas asymmetrisch). Die wichtigste Funktion ist 
(abgesehen von den Paddle- und Joystick-Abfragen) RDOT, 
das sich zu POINT so verhält wie PEEK zu POKE oder wie 
Lesen zu Schreiben. 


PUHKT FÜR PUHKT EIN BILD 


Koordinaten mit FOINT 


Format: POINT f,x,y 
mit Farbzeiger f auf eine vorgewählte Farbe: 
(d "Papier", ] Rand, 2 "Tinte", 3 Zusatzfarbe) 
Koordinaten x von links nach rechts (® bis 1823) 
und y von oben nach unten (® bis 1923) 





Das ist weniger bequem als es gedacht ist. Will man das 
tatsächlich auflösbare Raster von 16@ Punkten (bzw. 89 

für x im Multicolor-Modus) verwenden, muß man mit dem 

Faktor 6.4 bzw. 12.5 umrechnen. Aber das ist noch nicht 
alles: Der Computer rechnet das intern wieder zurück und 
bekommt statt der ganzen Zahlen (die er theoretisch bekom- 
men sollte),gelegentlich Ergebnisse, die ganz knapp unter 
ganzen Zahlen liegen und die er dann prompt auf die nächst- 
kleineren abrundet. Rundunasfehler kann man bekanntlich durch 


Addition einer kleinen Zahl (z.B. 3) vermeiden. Liegen X und 


Y jeweils im Bereich von ® bis 159, so ist zu empfehlen: 
60 POINT 2,X*6.4+3,Y*6.4+3 


Zwei andere Schönheitsfehler liegen darin, daß Höhe und 
Breite des ganzen nutzbaren Bildschirms ungleich sind 
(bei gut justiertem Fernsehgerät um den Faktor 1,5), aber 
trotzdem beide in gleichviele Skalenteile aufgeteilt werden, 
nämlich 1824, und daß die senkrechte Teilung von oben nach 
unten geht und nicht, wie in der Mathematik üblich, von 
unten nach oben. Will man Koordinaten in beiden Richtungen 
im gleichen Maßstab und in den mathematischen Richtungen 
darstellen, empfiehlt sich: 

78 POINT 2,X,1823-Y*1.5 
Das Abbrechen des Programms bei negativen Koordinaten 
vermeidet man am besten mit IF-Abfragen, von denen man 
die Grafikanweisungen abhängig macht (denken Sie dabei an 
die Besonderheit, daß zwischen THEN und Super-Expander- 
Anweisungen ein Doppelpunkt stehen muß, abweichend von den 
sonstigen BASIC-Regeln), z.B.: 

8@8 IF X>8 AND Y>@® THEN:POINT 2,X,Y 


Polarkoordinaten mit W im Gradmaß verarbeitet man z.B. so: 
98 POINT 2,R*COS(W*/180)+512,512-R*SIN(W*IY 189) *1.5 


Steckt man das in eine FOR-Schleife für zunehmendes WU, 
bekommt man einen sauberen gepunkteten Kreis, bei Verwen- 
dung von DRAW statt POINT auch einen durchgezogenen. 


„“EROREHT HI "ERZEFRRT 7 


+ co rl1 mathe rn —- Urmr- sr ch ra 3 Ee Ti 


Das hört sich schlimmer an, als es ist. Hat man einen Punkt 
mit den Koordinaten X und Y, so kann man daraus einen neuen 
Punkt bestimmen mit den Koordinaten U und V und dazu die 
Umrechnung festlegen: 


U=A*X+B*Y 
V=SC*X+D*Y 
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Die vier Faktoren A BC D schreibt man dabei gerne als 
Tabelle oder "Matrix": (: ) 
CD 


01 
nichts, sie ist unter den Matrizen das, was unter den 


Faktoren die Zahl ] ist. ; ’) dagegen vertauscht Links 
und Rechts, 2 s macht alles schmaler usw. Eine beson- 
ders wichtige Matrix bewirkt eine Drehung um einen Winkel 
W (der hier im Bogenmaß, also mit dem Wert 6.28 für die 
volle Umdrehung, anzugeben ist): 

COS(W) a) 


Wie Sie sofort sehen, ändert die Matrix (; n überhaupt 


-SIN(W) COS(W) 


In dem folgenden Programm wird ein Dreieck fortlaufend 
um die Bildmitte gedreht und jeweils mit DRAW gezeichnet, 


bei Entfernung einer REM-Anweisung auch zwischendurch ge- 
löscht: 


rFEM DREHLHNG 


ic 


GEAFHIC = 

DATA 2a, -1a2, -ZuaE 

Eur I=1 TO 2:RERAD : 
3:505UB 19%: POINT 2 N #L. > 

FÜR I=1 TU 3:505UE 100: IEAHN 2 TO U.W1.2:HNEAT 

FAR J=a TO Sa@:HERT:FREM SCHCLR 

W=W+.4:50T0 40 


< 
une 
& 
mm 


REM DREHUNG U MIHEEL H 
USS12+8C DIESES ESIHÄMD 
YVEz3-Rar DI#ESIHCWI HT TIECOSCH) 
RETURN 


mem en) nm in a Pl In en 
negtimuii 


3 


DIAS 


l 


Das können Sie auch auf perspektivische Bilder anwenden, 
bei denen Sie ganz allgemein aus drei Koordinaten ABC 
zwei machen, etwa So: X=A+.3*C Y=Bt.2*C. 

Ienn Sie zwei Bilder nebeneinander zeichnen lassen und 
den bei X vorkommenden Faktor vor dem C für beide Teil- 
bilder etwas verschieden wählen, erhalten Sie sogar echte 
stereoskopische Bilder. 


FEIHGREAFIKOÖOCMAGHETISCH =SFEICHERH 


EilqJinbalte aur Earıcd cJler Diskette 





Oft dauert es Stunden, bis ein rechnerisch hergestelltes 
Bild fertig ist (z.B. ein Feldlinienverlauf). Man möchte 
es dann gerne in Minuten vom Band oder von der Diskette 
einlesen können. Mit dem folgenden Verfahren kann man 
Bilder mit 160 x 160 Punkten oder bei Multicolor mit 

80 x 16@ Punkten abspeichern und wiedergeben. Dabei ist 
es gleichgültig, ob sie mit der Super-Expander-Grafik 
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oder mit einer hausgemachten (im gleichen Format) erzeugt 
worden sind. 


Wir haben ja gesehen, wo die Informationen stecken: im 
Farb-RAM, in den 3208 Plätzen ab 4896 und in den trick- 
reichen Adressen 36864 bis 36879 (auf dem Video-Inter- 
face-Chip). Das Video-RAM (ab 7689) enthält keine Infor- 
mationen, muß aber bei der Wiedergabe mit den fortlaufen- 
den Zahlen so gefüllt werden wie bei der Aufnahme, also 
vernünftigerweise spaltenweise (beim Abspeichern von 
Super-Expander-Grafik ist das so festgelegt, und man sollte 
es bei der hausgemachten Feingrafik auch so tun). 
Schreiben Sie als Beispiel (wobei für a eine 8 zu setzen 
ist, wenn Sie mit der Floppy arbeiten, eine ] für den 
Cassetten-Recorder): 


Id GRAPHIC 1:COLOR 1,3,6,2 


28 FOR I=1 TO 22:CIRCLE I AND 3,512,512,1*20,1*2gQ 
30 NEXT 


100 UPEN 2,a,2,"BUNT,S,W" 

10 FOR 1=36864 TO 36879: A=PEEK(I):PRINT#2,A:NEXT 
28 FOR 1=3840@ TO 38599: A=PEEK(I):PRINT#2,A:NEXT 
30 FOR I=8 TO 3129: A=PEEK(4@96+1):PRINT#2,A:NEXT 
48 CLOSE 2 


u u u 


Der Name des Bildes (hier "BUNT") darf auf jeder Diskette 
nur einmal auftreten, beim Tonband spielt er natürlich 


keine so große Rolle, wenn man das Bandzählwerk benutzt. 


Damit Sie bei der Wiedergabe nicht unfairerweise zu früh 
vom stehengebliebenen Bild profitieren, schalten Sie den 
VC 20 vor der Wiedergabe am besten kurz aus. Das Wieder- 
gabeprogramm lautet dann in einer sehr allgemeingültigen 
Fassung: 


10 FOR i=8 TO 19:FOR J=8 TO 9 

28 POKE 7680+1+J*20,J+1I*1O:NEXT:NEXT 

32. OPEN. 2,852 ,"BUNT,S,R” 

48 FOR 1=36864 TO 36879: INPUT&2,A:POKE I,A:NEXT 
5@ FOR 1=38409 TO 38599: INPUT#2,A:POKE I,A:NEXT 
6d FOR I=9 TO 3199: INPUT&2,A:POKE 40896+1,A:NEXT 
70. .CLOSE 2 

80 GOTO 89 


aisthier wieder 3 für Floppy, 1 für Datasette, der Name 
("BUNT") muß natürlich mit dem Namen des abgespeicherten 
Bildes übereinstimmen. Sie können die einzelnen Schritte 
zum Teil während des Lesens verfolgen, insbesondere die 
Reihenfolge bei der Hauptsache in Zeile 6ß. 


Das schnelle Bild, 


Das Verfahren, Bildinhalte als sequentielle Dateien abzu- 
speichern, ist nicht besonders schnell. BASIC-Programme 
können (bei gleicher Länge, d.h. gleich vielen Bytes) of- 
fenbar wesentlich schneller geSAVEt und geladen werden” 
Dazu erzählen wir dem VC 20 einfach, im Character-RAM für 
unsere Multicolor- oder Feingrafik befände sich ein BASIC- 
Programm und er möchte es bitte SAVEn. Zeile 178 gibt 
Anfang und Ende des vermeintlichen BASIC-Programms an: den 
Bereich von 4096 bis 8192 (das ist sogar etwas zu weit); 
die letzte Zeile ist der SAVE-Befehl. 


FEN D9OCHSSIHI AUFHAHME AUF DTISKETTE 


rn 


y 
Ds 
u 
er 


GEAFHIT 1: LOLUR AM. l. 

FÜR »=1 TO 7a 5TEP & 

FÜR Y=1 Tü 153 STEF & 
PLSCCH IB TEENS NO 
Rest la+r237 730 12H Var tz 
F=s\.Ri#R2:1T.25 AHD 3 

FOIHT F,S515-8.4#4.,514-3, 24 
FOIHMT F.S a 44.2143, 2%7 
se FOINMT F.S1Ste.4##. 1442. 247 
133 FOIHT FEIERTEN 1442. 287 
169 HEAT:HEHT 

ira FORE43, 1: FOKEd4, 15 FORE4S. 1: FOKE4S , 23 
123 SAVE"CHSSIHI".S 


WC) 


” 
—_— 


Zr ii 


a 
NN Be llcupirı 
> (DI 


* Den Trick, ein Bild wie ein BASIC-Programm zu speichern, 
verdanke ich Herrn Hecker. 
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Als Beispiel wird hier eine Schar von Cassini-Kurven ge- 
zeichnet, sicher eine der reizvollsten Computer-Grafiken, 
die mathematisch sehr einfach formuliert werden können: 
Jede Kurve besteht aus Punkten, für die das Produkt der 
Entfernungen zu den beiden Brennpunkten gleich ist. Die 
Flächen zwischen diesen Punkten lassen wir in vier ver- 
schiedenen Farben im Multicolor-Modus des Super-Expander 
anmalen. Das ganze dauert rund 20 min, so daß sich die Auf- 
zeichnung des fertigen Bildes auf die schnelle Tour lohnt 
(zum Probieren der Methode können Sie natürlich auch mit 
der Grafik etwas Schnelleres zeichnen lassen, wobei das 
Verfahren dann an sich überflüssig ist). Das SAVEn dauert 
weniger als 20 Sekunden. Schalten Sie hinterher Ihren VC 20 


kurz aus, damit die verstellten "Zeiger" wieder stimmen. 


=9 REM WIEDERGARE BILD “OH TISKETTE 

33 IF FEEKC3ESEIITHZIRTHEN END 

129 THPUT"HAME. MODUS, COLOR" SRS,MCR.B.CHL 

145 FÜR I=A TO Se: FOKE 3949041. C+5#02-M3 :HEAT 
112 GRAFHIC M:CüLörR A.B.C.D 

123 LORDEA$>.3, 1 


Das Wiedergabe-Programm ist bestimmt für derartig erzeugte 
Bilder, die wie ein BASIC-Programm geSAVEt sind, und zwar 
im Grafikmodus ] oder 2, allerdings ohne Benutzung von 
REGION (d.h. nur 4 bzw. 2 Farben auf dem ganzen Schirm). 
Nach dem Starten des Wiedergabgrogramms sind der Name des 
Bildes (in unserem Beispiel CASSINI), der Modus ] (sonst 
auch 2) und die vier Farben für COLOR (ganz nach Ihrem Ge- 
schmack; muß mit der Aufnahme nicht übereinstimmen) einzu- 
geben. Das Farb-Video-RAM wird dann mit der Kennziffer der 
gewählten "Tinten-"Farbe und dem Grafikmodus (nämlich mit 
oder ohne 8) vollgeschrieben, dann wird der Inhalt des Cha- 
racter-RAM von der Diskette eingelesen; zugleich entsteht 
das BIld spaltenweise recht zügig auf dem Schirm, nämlich 


in wenigen Sekunden. 


WIE MAH IH DIE SUPER—-GRRAFIK 
HINEINPFFUSCHEN <KRHH 


n3.mlich mit POKE 


Das hört sich sehr gefährlich an. Da wir aber mittlerweile 
wissen, wie die Grafik des Super-Expanders organisiert ist, 
können wir kleinere Bildstücke mit sehr plötzlicher Wirkung 
hineinsetzen, mit POKE oder sogar mit PRINT (bei PRINT muß 
man aber aufpassen: Das Programm muß dann in einer Fangschleife 
enden, damit es nicht READY auf den Bildschirm zu schreiben 
versucht und anschließend das Bild hochschiebt; außerdem 
stehen ja für PRINT nicht die normalen Buchstaben zur Ver- 
fügung, sondern die Elemente des gezeichneten Bildes). 

18 GRAPHIC 2 

28 CIRCLE 2,25,50,29,40 

38 FOR I=@ TO 199:POKE 76808+1,0 

408 POKE 38400+1,2:NEXT 


Hier wird erst links oben eine Ellipse gezeichnet, die das 
erste (genauer: Nr. ®) der 2@@ Felder fast ausfüllt. An- 
schließend verändern wir nun die Organisation des Bild- 
schirms und schreiben ihn ganz mit diesem Teilbild voll. 

Es geht auch mit PRINT, innerhalb oder außerhalb des Pro- 
gramms: Für Zeichen Nr. @ ist die Taste "Klammeraffe" @ 
zuständig. 

Auf diese Weise kann man in einem fertigen Grafikprogramm 
einzelne Bildteile gegeneinander austauschen oder mehrfach 
zu zeichnende Stücke praktisch gleichzeitig erzeugen. Man 
kann aber auch die Zeichen ab Nr. 288 bit-weise mit Leben 
erfüllen und dann schlagartig ins Bild mischen. Der Haken 
bei der Sache ist nur, daß man auf diese Weise nur im Raster 
der 18 doppelthohen Zeilen und der 29 Spalten arbeiten kann, 
also in dem gleichen Raster, in dem man die Farben bei der 
Feingrafik frei wählen kann. Die Grafik-Anweisungen wie 
POINT, DRAW usw. wirken einfach auf die Speicherplätze ab 
4896, sozusagen in der Annahme, daß im Video-RAM die gewohnte 


Ordnung herrscht, die man aber auch gezielt abändern kann. 


“vgl. Anhang S. 171 und 173 
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SCHMARZ AUF MEISS HACH HAUSE TRAGEH 


o 
M 


r WC 1525 als Feinhäarsfib-—-DOruckenr 





In der Gebrauchsanleitung des VC 1525 kann man erfahren, 
wie man einzelne Buchstaben selbst erzeugt und dann druckt: 
Man baut sie spaltenweise aus einzelnen Bits zusammen; jeder 


Punkt wird zu einem Bit, das oberste in einer jeden Spalte 
zählt I, das nächste 2 usw., bis zum untersten: 64. Bildet 
man für eine Spalte innerhalb eines Zeichens die Summe S, 
so ist zu drucken: CHR$(128+$), wobei irgendwann vorher 
mit PRINT=1,CHR$(8) auf Feingrafik umgeschaltet worden ist. 
Die selbstgemachten Zeichen können aus nur einer einzigen 
derartigen Spalte (also 7 übereinanderliegenden hellen oder 
dunklen Punkten) bestehen. Das erleichtert uns die Grafik 
sehr. Im folgenden sollen 4 Arten beschrieben werden, das 
routinemäßig zu nutzen: 
1. für Kurven, die streng von oben nach unten gerechnet 
werden können (also Funktionen im engeren Sinne), 
2. für Kurven, die im Laufe der Rechnung nicht nur nach 
rechts und links, sondern auch von oben nach 
unten wandern, 


3. für Kurven, die nach langer Zeit beliebig weit nach unten 
laufen, aber dabei relativ wenig auf- und ab- 
schwingen, 

4. zum Ausdrucken eines mit dem Super-Expander erzeugten 
Feingrafik-Bildes. 


Da der Drucker nur vorwärts läuft und andererseits der 
Speicherplatz des VC 20 nicht unbegrenzt ist (das ist sicher 


keine Übertreibung), gibt es für diese Fälle verschiedene 
Taktiken, 


Bilder, die von oben nach unten berechnet werden können 

Eine Funktion im strengen mathematischen Sinne hat zu jedem 
vorgegebenen "Argument" X einen eindeutig allein daraus bere- 
chenbaren Wert Y(X) (wenn es sich um eine Funktion von nur 
einer Variablen, also nur von einem Argument handelt).Wenn 
wir X in der Richtung auftragen, die zum Papiervorschub ent- 
gegengesetzt ist, kann X so lange unbeschränkt anwachsen, bis 
der Papierstapel erschöpft ist. Y(X) wird dann seitwärts 
aufgetragen. Im ersten Beispiel ist die Funktion die Über- 
lagerung von zwei Sinuskurven mit unterschiedlicher Periode, 
wobei die mit der kürzeren Periode und kleineren Amplitude 
mit einer Exponentialfunktion abklingt (wenn Ihnen diese 
Bezeichnungen nichts sagen: Die Zeile 128 enthält diese 


Funktion, die Sie durch fast beliebige andere ersetzen können). 


58 REM FUHMKTION PLOT 
el: 


38 DIM AXC438):0PEH 1.4:PRINT#1,CHRECE) Ei 
128 PRIHT#1:FOR I=0T0 6& BR 
1192 Kex+1 i 

129 Y=7OH40#SIHCH/2O)+20ESINCH/3IHEHF CHLOR) a 

139 AXCTISARCHIHZtT > 

148 HEXT ee 

150 FOR J=@ TO 150 | 
162 PRINT#1.CHREUI2EHARCTDN: Gl 
1ES NEXT De 
179 FOR I=8 TO 230: ARCMI=BNEXTSSOTO I 0 h 


51 21 2 1 1 2 
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Da der Drucker im Grafikmodus jeweils 7 übereinanderliegende 
Punkte als ein Byte entgegennimmt und druckt, stellt das 
Programm 488 solche Bytes A%() bereit. In der Schleife aus 
Zeile 188 wird die laufende Variable X 7-mal weitergezählt, 
für jedes X wird der Funktionswert Y berechnet und in Zeile 
130 als einzelnes Bit in das passende Byte A%(Y) eingefügt: 
zuoberst in einem Siebenerblock als 1, darunter als 2, dann 
als 4, zuunterst schließlich als 64 (vgl. Gebrauchsanleitung 
des Druckers VC 1525). Sind alle 7 X-Werte dieser Serie 
fertig berechnet und in die Bytes eingeschrieben, wird eine 
ganze Zeile gedruckt (gemäß Programmzeilen 150 bis 165); 

der Drucker setzt dazu mehrmals an, da er im Grafikmodus 
nicht 80, sondern 480 Bytes für die ganze Zeile braucht und 
das nicht auf einmal puffern kann. In Zeile 178 werden die 
Bytes wieder auf @ gesetzt, und das Spiel kann mit den 


nächsten 7 X-Werten weitergehen, solange das Papier reicht. 


EN . u 3 ö F ! ? .. Fa . 


ur 


35 DIMARC4385:DPENI,4:PRIHT#1.CHRELS3N 
188 PRINT#1:FORI=STOE 

11a Aut. 25 

125 Y=39:FOR K=1 TO 19 STEP 2 

121 YeW+17#5INCREK) /K+36 

138 AALISAACH) OR 201 

1353 NEXT 

144 NEAT 

158 FOR J=8 TOD 479 

168 PRINT#1. CHRECIZS+AACTID: 

165 NEA 

175 FOR I=8 TD 479: RAACI)=a:NEXT:GOTO 188 
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Im zweiten Beispiel werden gleich 19 miteinander verwandte 
Funktionen nebeneinander gedruckt. Anstelle der einfachen 
Funktionsberechnung ist eine Schleife (Zeilen 128 bis 135) 
getreten. Auch hier kann das Bild nach unten unbegrenzt 
fortgesetzt werden. Es zeigt übrigens die Fourier-Synthese 
einer Rechteck-Funktion aus Sinuskurven passender Ampli- 
tuden und abnehmender Perioden. 


Das dritte Beipiel ist ein Dichtebild, bei dem eine 
Funktion von X und Y abhängt und als Helligkeit dargestellt 
wird. Da unser Drucker nur Schwarz und Weiß unterscheiden 
kann, lassen wir den Computer würfeln: Je heller das Bild 
an der jeweiligen Stelle sein soll, um so wahrscheinlicher 


wird die Vorbereitung zum Drucken eines schwarzen Punktes 


S5 DIMARC43B>:DPEH 1,4: PFRINT#L,CHR$CS) 
185 FRINT#1:FOR I=5 TOD 6 

118 K=A+l 

128 FOR Y=B TO 458 

121 E1=SORG R-28) 12+V7-20905 122 

122 RK2=SORCCH-20) 12H 72287 12) 

123 R=R1-RZ:5=1+5IHCR) 

124 IF RNDC1YKZ>S THEN GOTO 148 

138 AACHSAAl +2 TI 

148 NEXT: NEXT 

158 FOR J=8 TO 456 

168 PRINT#1,CHR$(C123+AA. TI 

155 HEAT 

ira FOR I=B TO 458: Arc T5=B:HEAT:GOTO 188 
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übersprungen (Zeile 124). Die Punkte werden in einer Doppel- 
schleife (außen GOTO-Schleife für X, unbegrenzt; innen Y 
zwischen @ und 488 in FOR-NEXT-Schleife) behandelt. Die 

in diesem Beispiel gezeigte Funktion ist das Interferenz- 
bild von zwei kreissymmetrischen Wellen, die von zwei 
Punkten ausgehen und die gleiche Wellenlänge haben (wenn 
Ihnen der physikalische Inhalt nichts sagt: Sie können mit 
Funktionen wie SIN, SGN usw. fast beliebige Muster erzeugen). 


Parameter -Darstellungen 


Hinter diesem Mathematiker-Chinesisch verbirgt sich ein 
Prinzip, eine Kurve zu zeichnen, die in X- und in Y-Richtung 
gleichermaßen wandert, und zwar durchaus vor- und rückwärts. 
Zur Berechnung von X und Y muß man dabei auf eine andere 
Größe zurückgreifen, die nachher im Bild gar nicht mehr 

zu sehen ist, die aber entlang der Kurve mehr oder weniger 
gleichmäßig fortschreitet: anschaulich auf die Zeit, die 
während des Zeichnens abläuft; allgemein wird diese Größe 
in diesem Zusammenhang "Parameter" (="Nebengröße") genannt. 
Da unser Drucker leider nicht das Papier abwechselnd vor- 
und zurückschieben kann, helfen wir uns mit einem Vorrat 

an Bytes, der für das ganze Bild ausreicht. Unsere Kurve 
kann dann kreuz und quer laufen; ihre Punkte werden mit 

OR in die passenden Bits gesteckt (Zeilen 148 bis 158). 

Ist die Kurve fertig im Speicher, wird das ganze Bild auf 


Er REM PARAMETER-PLOT 
l . 


188 DIM AXC190,14) a Ar 
118 FOR T=8 TD mkBR STEP .3 w E 
120 %=59+35£SIHCT/49+148SINCT/S5 en 

133 Y=50+25#C03(T/49)+14#C02(T/5) A 
rar a 
I % BE z=Ll 4 7 I , 2 er , 1 
168 NEXT / N — 
23a OPEN1,4:PRIHT#1,CHRECH Mes 

218 FORYI1=OTN14:FORK=BTO19B tr 

228 PRINT#1:CHRECIZBHRZCHTIID; 

239 NEXT :FRINT#1:NEXT 
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Eu 
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einmal gedruckt. In unserem Beispiel ist es eine Epizyklo- 
ide, eine Kurve also, die beim Wandern eines Kreises auf 


einem größeren Kreis entstehen kann. 


Dieses Verfahren ist hinsichtlich der Kurven völlig frei, 
ist aber im Format durch den Speicherplatz des Computers 
beschränkt. 


Eine Mischform 


In speziellen Fällen kann es vorkommen, daß man ein unbe- 
schränkt langes Bild drucken möchte, bei dem trotzdem nicht 
alle Punkte in der genauen Reihenfolge des Papiervorschubes 
berechnet werden können. Das Beispiel zeigt die Reflexion 
einer transversalen Welle zwischen einem losen und einem 
festen Ende (falls Ihnen das nichts sagt, betrachten Sie es 
als schönes Tapetenmuster). Die einzelnen Kurven schwingen 
nach oben und unten durchaus weiter als um eine Druckzeile. 
Auf der anderen Seite kann der VC-20 unmöglich alle Bytes 
speichern für das ganze Bild.Der Trick besteht nun darin, 
Jeweils drei aufeinanderfolgende Druckzeilen im Computer 

zu speichern und während der Rechnung in sie Bits einzu- 
fügen (also Bildpunkte). Dann wird die oberste von ihnen 
gedruckt (Zeile 30ß), und die anderen beiden Zeilen werden 
im Variablenspeicher um ] verschoben (Zeile 318) und 
geleert (329). Durch die mit K indizierte Schleife in 399 
wird das Bild um den Faktor 5 seitwärts gestreckt. Die 


35 REM TRANSY. REFLEXION 

31 DIMGAC2,883 OPEN 1.4: PRINT#1.CHRECS} 

189 DIM Yeea).Ye6B5:DT=.3:D=1 

11& FÜR I=s8 TO Ba: YCIN=194EHPL-01-29) 12/393 NEXT 
258 FOR I=B TD 2% 

281 YeWel2+198.5:11=INTOH7/7 9 VE=SINTER- RTL) 

282 Gall, Ir=ßGacti, DORZIE 

283 NE&T 

218 FOR I=8 TO 89:YCDI=SVEISHWYEIDEDT NEXT 

228 FOR I=1 TO 88 

238 DL=8:IF I>8 THEN DL=YCI:-Y7il-1) 

245 DR=B:IF I1<E8 THEN DRSYCI+1o-WEIn 

258 MCID=YLII+DEDT#CDR-DL>: NEST 

25M F=P+1:IF P=7 THEN P=8:G0T0 398 

288 GOTN 218 

388 FOR J=8 TO 73:FOR K=8 TO 4:PRINT#1,CHREC128+6%C8. T7 73 :NERT 
218 6268, D=67(1.12:6G7(1, 17=64(2,J) 

323 GRrr2. I2=08:NEXT:PRIMT#1:50TO 286 


Zeilen Id@ bis 280 beschreiben im wesentlichen den physi- 
kalischen Inhalt des Programms (der hier nicht weiter er- 
erläutert werden soll), 2@1 bis 282 speichern die zu zeich- 


nenden Punkte ab. 


DEH EILDSCHIFHM FHBODRUCHKEH 


Har-cdcops bei Feinmararik 





Unter Hardcopy versteht man das das Ausdrucken eines Bild- 
schirminhaltes. Wie man das mit Buchstaben und der Tasta- 
turgrafik (also den 256 Zeichen der Tastatur) machen kann, 
finden Sie im Handbuch des Druckers VC 1525. Im folgenden 
geht es um die Hardcopy der Feingrafik, wie man sie z.B. 


mit den Grafikanweisungen des Super-Expanders erzeugen kann. 


Die Bildpunkte sind bei der Grafik des Superexpanders je- 
weils waagerecht zu Gruppen aus 8 zusammengefaßt, deren 
Jede ein Byte im (verschobenen! Character-Speicher bilden. 
Für den Drucker VC 1525 müssen dagegen je 7 untereinander- 
liegende Punkte als ein Byte auf die Reise geschickt werden 
(wobei pro Byte ein Bit ungenutzt bleibt). Eine nicht ganz 
saubere, aber schnelle Methode besteht darin, das Bild ein- 
fach zu kippen und 7 gerade sein zu lassen: 


26 REM FEINGRAFIK HARDCGPY SCHHELL 
1: 


198 GEAPHIC 2 

ils CIRCLE 2,3830, 380, 37.3708 
111 CIRCLE 2,528, 388.378, 378 
112 CIRCLE 2.5605,6528, 278,378 


125 CHAR 5,3." R" 

121 CHAR 6.16, "PB" 
122 CHAR 15,19, "0" 
123 CHAR 4,8," A „E" 
124 CHAR En, 
125 CHAR 1 
125 CHAM 5,€£ 
138 

za8 DFEH 1,4: PRINT#1,CHRE2) 
229 FÜR Y=za TD 1 STE -1 

sa FÜR #=153 TO 8 STEP -1 

242 B=PEEHC4OISH TEL ER-R> OR 125 
268 PRIHNT#L,CHRECEDG CHEAT 

aan PEINT#L: HE=T 

258 GOTD 258 e— 
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Die CIRCLE- und CHAR-Anweisungen erzeugen ein beschriftetes 
Bild auf dem Bildschirm. Das bei 288 beginnende Programm 
druckt es byteweise aus, wobei 1/8 verlorengeht: vom Bild- 
schirm aus gesehen jeweils ein senkrechter Streifen, vom 
Drucker aus gesehen, ein Achte] jeder Druckzeile. Dieses 
Hardcopy-Programm ist schnell (ca. 2 min) und einfach, man 
kann es benutzen, wenn es auf die Details nicht so sehr an- 
kommt (bei den Buchstaben des Textes werden die Zwischen- 


räume innerhalb der Wörter geopfert). 


Wenn Sie nun aber auf kein Bit des Bildes verzichten möchten 
und dafür auch die vierfache Zeit zu opfern bereit sind, 
verwenden Sie besser das folgende Programm. Es schneidet 

in etwas kniffliger Weise aus je zwei Bytes (die im Speicher 
um 168 hintereinanderliegen, auf dem Bild aber benachbart 
sind) ein Kopf- und ein Schwanzende ab (mit dem Masken MI() 
und M2()) und bringt sie nach geeigneten Bit-Verschiebungen 
(Multiplikation bzw. Division mit ganzen Potenzen von ?2) 

zu den richtigen Bytes zusammen, die an den Drucker gehen. 
Dabei spielt das Teilen mit Rest durch 8 (Zeile 229) eine 
entscheidende Rolle; die weiteren Einzelheiten können Sie 
aus dem Programm heraustüfteln, wenn Sie es genau wissen 
wollen.Es ist anwendbar auf jedes Bild, das wie im Modus 
GRAPHIC 2 des Super-Expanders in den Speicherplätzen 4896 
bis 7295 liegt. Sehen Sie zunächst, wie unser Mengenlehre- 


Bild nun vollständig aussieht: 
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1965 
118 
114 
142 
124 
121 
124 
125 
Z£ 
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35 REM FEINGREAFIK HARDCOPT E#ZAKT 


GEAFHIL 2 

CIRECLE 2.,5388.380.3 
CIRCLE e, 62, 32,3 
CIRCLE 2,599.6289,2 
CHAR 6,3. "RAR" 

EHHR Bas 

CHAR. 105,195" 
CHAR 4.85. "A EB" 
GHRE: 14; 
CHAR 11. 
CHAR E 


(0 lyI 6 


An 
GDC 


Date 3, 


E 
1 
A :REAI M&« 
OPEN 1,4: PEINT#L,CHRS 
HA=R AHD 7: F=A-AA 

FOR »=4 TOD 153 
Ei=FEEHC4HSEHTE2R+HD) AND MICARN 
BZ=PEEKCHSIEHTEZE+ HS AHD M2CHAAN 
E=BZ#2 PL AH+1I+E1F 2 RI 7 -AR)+128 
FERIHMT#1,CHFECES SC NEHT 

FEINT#1:IF Abe THEN AsA-7:60T0 276 
HIT 256 





Papiervorschub 
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2 REM FEINGRAFIK HARDCOPY EZAKT 


135 GRAPHIC 2 

115 A=7069: B=398:C=209: I=36%: 2=15 
126 FOR I=8 TO Z:DRAH 2, B/Z#1,07281+D/2#02-13 TO ArB/Z#L, CC+DI/Z#I: HER 
139 FÜR I=3 TO Z:IRAU 2,A/Z#1,D/z#lZ-I> TD BHA/ZHL,C+HD/Z#I:NEAT 

148 CHAR 17,8, "HFPERBOLISCHES" 

141 CHAR 19,5, "PARABOLOID" 

199 

2a DATA 123,192, 224, 240,243, 252, 254,127 
281 DATA 63,31,15,7:,3,1,9,8 

255 FOR I=G TO ?:READ MICIH:NEST 

236 FÜR I=8 TO ?:READ MZCIH:NER 

21a DPEH 1,4:FRINT#1, CHRELOF :A=160 

228 AA=A AHD 7: Y=A-AR 

239 FOR %=B TO 159 

2dfä EI=SPEEK(4BIS+T7E20+%) AND MICAR) 

241 B2=PEEKC33FIEHTK2U+%) AHD M2OCAR) 

259 B=eBe#ZtcAA+id+B1/21C7-AA?+123 

268 FPRIHT#L,CHRECRN: :HEZT 

279 FRIHT#L:IF AS THEN A=A-7:60T0 224 
238 GÜTN 269 





HYPEREOLISCHES 
FAEREOLGIT 


Ein anderes Beispiel ist das Bild des hyperbolischen Para- 
boloids. Für Nichtmathematiker sei nur gesagt, daß es sich 
um eine räumliche Fläche handelt, die wie ein Sattel zu- 
gleich nach unten und nach oben gebogen ist und dabei aus 
lauter Geraden besteht. Die Anfertigung der Hardcopy hat 
überhaupt nur Sinn, wenn entweder ein schon fertig vorlie- 
gendes Grafikprogramm genutzt werden soll, oder wenn Grafik- 


Anweisungen wie DRAW, CIRCLE, PAINT usw. darin wichtig sind. 
Geht es nur um POINT, ist ein direktes Programm für den 


Drucker schneller und natürlich im Format flexibler. 


Vielleicht ist Ihnen schon aufgefallen, daß die Buchstaben 
des Druckers anders aussehen als die über CHAR und Hardcopy 
erzeugten des VC-2@-Zeichensatzes. Hier eine Gegenüberstel- 


lung: 
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CHAR 
CHAR 
CHAR 
CHAR 
CHAR 
CHAR 
CHAR 
CHAR: 
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Der Grund liegt natürlich im 6x 7-Raster des Druckers VC 1525, 
der insbesondere gewisse Grafikzeichen nicht eindeutig aus- 


listen kann. 


Während beim Drucker die 
hat das Bild auf dem Bildschirm das Seitenver- 
es aus 160 x 160 Punkten besteht. 
der Hardcopy entstehende Verzerrung nicht gleich- 


breit sind, 
hältnis 3:2, 
nun die bei 


gültig 


nicht zu Ellipsen werden sollen), 


Punkt in der zu verlängernden Richtung verdoppeln; 


kann man 
das geht 


Programms 


obwohl] 


(wenn z.B. 


auch brutal 


(das zwar schnell, 


Kreise auf dem 


von je drei 


"Punkte' 





annähernd ebenso hoch wie 


Ist 


Bildschirm beim Drucken 
kann man jeden zweiten 
natürlich 


Punkten nur 2 ausdrucken, 


sehr einfach durch Änderung des zuerst genannten 


aber auch so schon nicht exakt 
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ist). Das folgende Programm läßt nichts weg und rettet das 
Seitenverhältnis 3:2, ist aber nicht nur sehr umständlich 
(alle Bits müssen aus dem "waagerechten" Bytes in "senkrechte" 
umgefüllt werden!, sondern auch sehr zeitraubend bei der 
Ausführung. Es hat also nur Sinn, wenn man ein vorhandenes 
Grafikprogramm nutzen will und eine längere Programmierpause 
einlegen will. 


188 REM FEINGRAFIE HARTCOF'T RECHTECK 2:2 

181 

118 GRAPHIT2 

115 FOR Isa TO 15:CIRCLE 2. 1448, 512, IK2o. 1838: HEAT 
116 : 

122 ÖFEHL,4:PRINT#1,CHRECS) 

133 FOR Y1=8 TO 160 STEP? 

131 FÜR »#=4 TO 153 

143 B=125:FÜR Yzsa TO 6 
154 AI=SIMTCArZ+. B12: A223 

1558 A=PEEK. 493547 1+72+21#165092 

178 B=B-Cih AHD Zr 7-2 AD HZTTE NEST 
153 IF # AHD 1 THEN FRINT#1.CHREUEN 
185 PEINT#1,CHR&CBS: CHEAT 

133 FREINT#1:HEHT 
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HAT DER WC 20 TÖHE 7? 


Mvsszsik über den Fernsehk anal 


© 


° & 


Er hat sogar mehrere gleichzeitig: über den Fernsehkanal 
drei Töne und ein Geräusch; außerdem kann man mit einen 
zusätzlichen Verstärker (z.B. Phonoanschluß des Radios) 
noch einen vierten Ton erzeugen. Betrachten wir zunächst 
die zuerst genannten drei und das Geräusch: 


Maßgebend sind hier die Speicherplätze 36874 bis 36878, 

von dem letzteren allerdings nur die niedrigere Hälfte (also 
die Bits, die man mit "AND 15" abfragen kann, denn die an- 
dere ist mit der vierten Farbe für den Multicolor-Modus 
belegt: hier wohnen Bild und Ton wahrhaft eng benachbart !). 
Bleiben wir gleich bei diesem halben Byte: es enhält die 
Lautstärke in Gestalt einer Zahl von @ bis 15. Man setzt 

sie mit POKE 36878,L (wenn Multicolor nicht benutzt wird) 
bzw. mit POKE 36878, (PEEK(36878)AND248)+L. In die anderen 
vier Speicherplätze werden Zahlen zwischen 128 und 255 
geschrieben, wenn etwas erklingen soll, oder eine Zahl 

unter 128, wenn nicht (das oberste Bit dient als Schalter). 
Die Lautstärke hängt natürlich auch noch von der Einstel- 
lung des Fernsehgerätes ab; auch muß der Kanal besonders 

gut eingestellt sein, wenn farbiges Bild und Ton zugleich 
sauber kommen sollen. 
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Jeder der drei Tongeneratoren (und der Rauschgenerator) 
sind über etwa drei Oktaven verstellbar, wobei die Genauig- 
keit nach oben immer schlechter wird. Die unteren Grenz- 
frequenzen sind: 
Nr. 1 (tiefer Ton) ab 34 Hz TA= 4329 

2 (mittl. Ton) 68 TA= 8659 

3 (hoher Ton) 135 TA=17320 

4 (Rauschen) (ab 271 Hz) TA=3464Q 
(Lassen Sie sich durch die falsche Zuordnung der Stimmlage 
"Alt" in manchen Gebrauchsanleitungen nicht beirren !) 
TA gibt die Taktfrequenzen an, aus denen die Tonfrequenzen 


indirekt durch Abzählen von Perioden erzeugt werden. 


Das Wichtigste an einem Ton ist bekanntlich die Frequenz, 
die angibt, wie oft sich etwas (in der Sekunde) wiederholt. 
Stattdessen kannman auch angeben, wie lange eine Periode 
(also das, was sich regelmäßig wiederholt) dauert: das 

eine ist der Kehrwert des anderen, z.B. hat der "Kammerton", 
also der Ton, von dem man beim Stimmen der Instrumente aus- 
geht, 440 Hz, die Periode dauert also 2,2727 Millisekunden. 
Unser Tongenerator Nr. 2 (mit der POKE-Adresse 36875) hat 
die Taktfrequenz 8659 Hz, also eine Periode von 115,5 Mikro- 
sekunden. Läßt man sie (wegen des Verhältnisses beider Frequenzen 
oder dessen aus den Periodenlängen, nämlich knapp 28) 28- 
mal verstreichen, bis eine neue Schwingung angeregt wird, 

so trifft man mehr oder weniger genau den gewünschten Ton. 
Damit der Computer bis 2@ zählt, POKEn wir in den Speicher- 
platz (in diesem Fall 36875) 255-2@, also 235. Er beginnt 
dann immer mit dieser Zahl und zählt bis 255. Denken Sie 
aber daran, daß Sie nicht weniger als 128 einPOKEn dürfen, 
wenn der entsprechende Generator eingeschaltet sein soll. 


Wie rechnet man nun die Frequenzen aus, wenn man nur die 
Notennamen weiß ? Verhalten sich die Frequenzen zweier 

Töne wie 1:2, ihre Perioden also wie 2:], so nennt man das 
Intervall in der Musik eine Oktave und teilt es in 12 Halb- 


tonschritte ein. Damit sich diese gleichmäßig in der Ton- 
höhenänderung anhören, darf sich weder die Frequenz noch die 
Periode in gleichgroßen Schrittenändern, sondern die Ver- 
hältniszahlen (Quotienten) müssen immer gleich sein, also: 
tg “ fast, Zee en aber das Produkt aller dieser 


> & : \ 12 
12 Verhältnisse (fı/f,) (f,/f,): ee (fia/f,,) (ff) ./fg) 


ist wieder 2, nämlich fa’fg . Also ist das Verhältnis der 
Frequenzen für einen Halbtonschritt die 12. Wurzel aus 2, 
das ist etwa 1.905946. Die Notennamen (wie sie im deutsch- 
sprachigen Raum üblich sind; im Englischen wird H B genannt) 
sind so festgelegt: 


Name: A B H € CS;,.D ES: E F Fis G As 
Halbton Nr. 2 1 2 s a 5 6 } 8 9 18 


Die Frequenzen erhalten Sie nun einfach für den Halbton Nr. N 
über dem Kammerton 448 Hertz als FR=44@*2AN; damit der Com- 
puter nun weiß, ab wo er bis 255 zählen soll, geben Sie ein: 
POKE 36875,255-(8659/FR), am besten natürlich im Rahmen eines 
Programmes und mit Verwendung von Variablen anstelle der 
Konstanten (z.B. T2=8659), damit die Ausführung schneller wird. 


Wenn Sie auf diese Weise vorgehen, brauchen Sie keine DATA- 
Felder aus der Gebrauchsanleitung abzutippen, schließlich 
kann der VC 20 ja selber rechnen. Sie sollten ihn aber nicht 
bei jedem Ton, den er spielen soll, neu rechnen lassen: das 
eignet sich nur für Trauermärsche und andere langsame Stücke. 
Lassen Sie für jeden Ton die Zahl, die eingePOKEt werden 

muß, direkt als Variable mit der Tasten-Kennummer als Index 
berechnen, wenn Sie z.B. ein Tasteninstrument nachahmen 
wollen. 


Abgesehen von den Geräuschen (mit denen man schön CRASH oder 
andere destruktive Vorgänge vertonen kann) können Sie drei- 
stimmig spielen; allerdings wird auf der Tastatur immer nur 
eine Taste gleichzeitig erfaßt. Sie können auch wie auf der 
linken Seite eines Akkordeons jeder Taste einen ganzen Akkord 


zuordnen (allerdings klingen sie nicht sehr gut, weil die 
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Frequenzen nicht so fein abgestimmt werden können wie auf 
dem größeren Bruder, dem Commodore 64). Zum Abfragen der 
Tastatur eignet sich besonders PEEK(283) für die "Klavier-" 
Tasten und PEEK(653) für die Vorwahl der Oktaven (Kombina- 
tionen aus SHIFT, CTRL und C=), weil diese immer nur solange 
gelten, wie die Tasten auch gedrückt sind. Wer es gerne mit 
Orgelpunkt (seltener wechselnden Begleittönen) haben möchte, 
kann einen anderen Teil der Tastatur mit GET abfragen und 
dann über die Tasten echt dreistimmig spielen; allerdings 
müssen die Tasten dabei immer kurz nacheinander gedrückt 
werden. Noch ein Tip zur Nachahmung von Klavier oder Mando- 
line: Während der Dauer eines jeden Tones kann man die Laut- 
stärke in einer FOR-Schleife absteigen lassen; das klingt 
für diese primitive Methode erstaunlich echt. 


Wer einen Super-Expander hat, kann statt der fünf POKE- 
Anweisungen einfach SOUND t1,t2,t3,t4,v schreiben, das 
vereinfacht die Sache etwas. Außerdem gibt es dort spezielle 
PRINT-Anweisungen, die ganze Melodien sehr einfach machen 
(vgl. Anleitung zum Super-Expander). | 

Kleine Programme für Musik- und Geräusch-Effekte finden 

Sie auch im VC-20-Handbuch (im Anhang). 


HD HOCH EIH TOHKFRHAL 


Hu=ik Über den User Fort 


Wer mit drei gleichzeitigen Tönen und einem Geräusch noch 
nicht die Ohren vol] hat, kann auch noch dem User-Port 

einen Ton entlocken. Dazu braucht man allerdings einen 
passenden Stecker und einen Verstärker (z.B. Radio mit 
Eingangsbuchse). Die Anschlüsse M und N (vgl. VC-20-Handbuch, 
Anhang L Nr.6) werden an Signal-(M) und Erd-(N)Anschluß 

des Verstärkers angeschlossen. Wenn man das Radio weit 
entfernt vom Fernsehgerät aufstellt, kann man damit sehr 
schön Stereo-Vertonungen machen (oder vierstimmig Akkor- 


deon spielen). 
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Natürlich geht es wieder einmal mit POKE in geheimnisvolle 
Speicherplätze. Da ist vor allem ein Schieberegister 

mit der Nummer 37146, in das man Bit-Muster (also Zahlen 
von ® bis 255) setzt, die zum Laufen gebracht werden können 
und dann am analogen (also Spannungs-)Ausgang Rechteck- 
schwingungen liefern. Schöne Rechtecke liefern die 


Zahlen: 15 = gdBplı1] B=16 
| 
51 = gelıggıı B=8 (wegen B siehe unten!) 
und 85 = B1018191 B=4 


und auch einige andere; die meisten Zahlen aber liefern 
kompliziertere Muster, die sich weniger gut anhören. 
Eingeschaltet wird das Laufen des Schieberegisters mit 
POKE 37147,16, ausgeschaltet mit POKE 37147,80. Das Aus- 
schalten ist sehr wichtig, da sonst der Cassettenrecorder 
außer Gefecht ist. Damit der Rechner auch weiß, wie schnell 
das Register laufen soll, bekommt er eine Zahl C in den 
Platz 37144, die man aus der Frequenz FR berechnen kann: 

C=1E6/FR/B-2 
Das B ergibt sich aus der Wahl des Bit-Musters (es ist 
sozusagen zur Periodenlänge innerhalb des Bitmusters pro- 
portional). Jetzt erst sollte man das Schieberegister füllen, 
also in dieser Reihenfolge: 

Id POKE 37147,16 

28 POKE 37144,C 

30 POKE 37146,15 

40 FOR 1=8 TO 10@00:NEXT:POKE 37147,0 
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Das Schöne an einem Bildschirmcomputer ist im Vergleich zu 
älteren Rechnern, die nur Ergebnisse auf Papier ausdrucken 
konnten, daß Vorgänge in ihrem echten zeitlichen Ablauf, wie 
in einem Film, gezeigt werden können (natürlich meist in Deh- 
nung oder in Raffung). Das sollte man auch dann ausnutzen, 
wenn nur eine Größe als zeitlich veränderliche Größe gezeigt 
werden soll, etwa als waagerechter oder senkrechter Balken 
entsprechender Länge. Damit man den zeitlichen Verlauf auch 
rückblickend vor sich hat, läßt man dann die Zeit in der 
zweiten Richtung ablaufen. Besonders einfach geht das bei 
der mit PRINT erzeugten Grafik mit waagerechten Balken: Wird 
der untere Rand erreicht, schiebt sich das Bild von selbst 
nach oben weiter. Arbeitet man aber z.B. mit der Grafik des 
Superexpanders und stellt die veränderliche Größe vertikal 
als Höhe dar, so trägt man üblicherweise die Zeit von links 
nach rechts auf. Wenn nun der rechte Rand erreicht wird, 
kann man wieder links anfangen und dabei das alte Bild 


auf einen Schlag löschen: 
IF X>1023 THEN X=8:SCNCLR 
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Dann ist aber jedesmal eine Zeitlang nicht mehr zu sehen, was 
kurz vorher gewesen ist. Sie können auch eine DRAW-Anweisung 
verwenden, die ein Stück rechts von der jeweiligen Zeichen- 
position einen senkrechten Streifen löscht. Das erinnert an 
einen Lehrer, der auf einer vollen Tafel von links nach rechts 
etwas anschreibt und dabei mit der linken Hand immer rechts 
von seiner rechten mit dem Lappen etwas leerwischt. Im Pro- 
gramm kann das etwa so aussehen: 

10 X1=X+10g 

28 ... (Berechnung von Y usw.) 

38 POINT 2,X,Y:DRAW 90,X1,8 TO X1,1823 

48 X=X+DX: IF X>1823 THEN X=9 

50 X1=X1+DX: IF X1>1023 THEN X1=9 

60 GOTO 20 


HIIZ UH DrHATEHSPEICHER 


Fhbrr-aoaev a1= Sriel und als 7er lce 


Wenn Sie viele Daten über ein bestimmtes Thema in ein Programm 
schreiben (oder in einer sequentiellen Datei unterbringen, was 
etwas umständlicher ist), können Sie sie entweder auf Stich- 
wörter hin abfragen; Sie können aber auch ein Quiz daraus 
machen, bei dem der Computer (evtl. nach vorgegebenen Kriterien 
wie Teilthemen, Schwierigkeit usw.) Stichwörter bzw. Fragen 
durch Zufall auswählt und ausgibt. Der Spieler muß dann eine 
richtige Antwort eingeben, bekommt dann Plus- oder Minuspunkte, 
sein Punktekonto, eine Korrektur der falschen Antwort oder ein 
Lob für eine richtige. Nas ist zwar vielleicht nicht die 
lustigste Art, mit einem Computer umzugehen, aber andererseits 
immer noch eine relativ unterhaltsame Art, Vokabeln zu ]lernen 
oder Grammatik zu üben (vor allem wenn man das Programm selbst 
schreibt, anhand eines Lehrbuches). 

Die Daten können natürlich auch grafisch veranschaulicht werden. 
Enthält ein Programm verschiedene Zahlenangaben über die 
Staaten (auch Zugehörigkeit zu Erdteilen oder Organisationen), 
kann man sich z.B. die Pro-Kopf-Bruttosozialprodukte der 19 
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flächengrößten Länder Asiens (oder der einwohnerstärksten 

Länder der NATQ usw) als Säulendiagramm (Histogramm) zeichnen 
lassen; Sie können sogar (wenn in den Daten jährliche Wachstums- 
raten enthalten sind), dasselbe für spätere Jahrzehnte machen, 
natürlich nur im Rahmen der Gültigkeit solcher Wachstumsraten. 


Oz MULTICOLOR 7 


FHurlozsundag 9eöey Mehr trarbiske it. 


Bei der Entscheidung zwischen der Mehrfarbigkeit und der 
besseren Auflösung (also zwischen GRAPHIC 1] und GRAPHIC 2 
beim Super-Expander) siegt meistens die Auflösung (zumal 
160 x 168 Punkte ja auch eher ein Minimum als ein Optimum 
ıst und man ja noch sehr viel Farbe, auch zur deutlichen 
Unterscheidung von Bildteilen, mit REGION ins Bild bringen 
kann). Es gibt aber Fälle, in denen Multicolor sehr nütz- 
lich ist: wenn es auf Annäherungen oder Überkreuzungen ver- 
schiedener Kurven ankommt, bei denen man möglichst an jedem 
SEN Punkt erkennen möchte, zu welcher Kurve er gehört. 
Überlagerungen von Wellen, Modulationen, Näherung einer 
Funktionskurve durch eine andere (oder durch Summen von 


anderen, z.B. Fourier-Reihen) sind da wichtige Beispiele. 
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Der VC 20 als automatische Drehorgel oder als Mini-Klavier - 
das sind spielerische Anwendungen, die zeigen, wie vielseitig 
ein Computer sein kann. Etwas ernsthafter kann man die Musik 
mit grafischenMitteln gleichzeitig visualisieren und damit 
melodische oder harmonische Strukturen sichtbar darstellen, 
während sie erklingen, seien sie nun vorprogrammiert, zufalls- 
erzeugt oder "live" auf den Tasten gespielt - oder auch aus 
diesen Methoden gemischt. So kann dann eine Zufallsmusik ent- 
stehen mit vorprogrammierten oder zwischendurch eingegebenen 
Wahrscheinlichkeitswerten für Töne oder Intervallschritte usw. 


Töne können auch Spiel- oder Vorführnrogramme akustisch 
kommentieren oder in ihnen Informationen ausgeben. Ähnlich 
wie bei einer modernen Reaistrierkasse können Eingaben zur 
Bestätigung mit einem Piepton quittiert werden, bei Auto- 
Rennspielen kann z.B. die Geschwindigkeit durch die‘ Ton- 
höhe angezeigt werden, beim Erreichen des Zieles wird eine 
Fanfare (aufsteigender Dreiklang z.B.) geblasen, beim CRASH 
kommt der Rauschgenerator zum Einsatz (mit abgleitender 
Frequenz). Es wird aber (vor allem wenn der Spieler noch un- 
geschickt ist) bald sehr nervtötend, wenn bei jedem Mißer- 
folg Chopins Trauermarsch ertönt: weniger ist oft besser. 
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Textverarbeitungsprogramme sind besonders dann interessant, 
wenn sie eher spielerischen Charakter haben; dazu einige 
Anregungen: 
Eingetippte Buchstaben ertönen sofort oder auf Abruf 
als akustische Morsezeichen, 
eingegebene Wörter werden durchgeschüttelt (Anagramme), 
oder es werden in vorgeschriebener Dosis Druck- 
fehler eingestreut (Test auf Lesbarkeit), 
ein Text wird in Geheimschrift verschlüsselt oder gar 
entschlüsselt (sehr einfach und verblüffend ist 
ein Code, der nach dreimaliger Anwendung wieder 
den Klartext liefert), 
mit dem Zufallsgenerator werden Parodien auf exotische 
Tiernamen (z.B. australische Drahthaar-Natter) 
oder auf modische Redetexte (emanzipatorisches 
Katastrophen-Bewußtsein) erzeugt, 
im Dialog werden Symptome für eine (scherzhafte) medi- 
zinische Diagnose oder eine Wetterprognose ein- 


CAD 


X foo\ 


Man kann sich sicher über die literarische Qualität von com- 
putererzeugter Lyrik streiten (im Vergleich zu anderer mo- 
derner Lyrik natürlich), aber immerhin ist bemerkenswert, daß 
der VC 28 ohne weiteres witzige Zusammenstellungen von Wörtern 
bringt, ohne selbst ihre Witzigkeit feststellen zu können; er 
ähnelt darin dem Kindermund. Auch sollte hier das Programm 
ELIZA (benannt nach der zur Sprache erweckten Eliza Doolittle 
aus Shaws Pygmalion) von Joseph Weizenbaum erwähnt werden: es 
parodiert einen dialogführenden Psychiater, der stets sehr 
»verständnisvoll”’auf die Äußerungen des Patienten eingeht. Im 
Programm läuft das mit INPUT und PRINT (eine BASIC-Version 


ist in dem im Literaturanhang erwähnten Buch "More BASIC Con- 


puter Games" enthalten). Weizenbaum war bestürzt über die 
Bereitschaft der Menschen, dem Computer wider besseres Wissen 
menschliche Qualitäten zuzuschreiben und ihm Vertrauen ent- 
gegenzubringen; sogar einige Psychiater wollten das Programm 


ernsthaft für die klinische Anwendung erweitern und einsetzen. 


I=T oA= ETbLiAn HUHmST 7 
a 


Comriaterım—-öratrik zum FHumzschanevn 


Da gibt es zum Beispiel die Viertelkreise in der Tastatur- 
Grafik. Schreibt man: mit ihnen den Bildschirm ganz zufällig 
voll, so ist das Ergebnis ziemlich chaotisch. Schreibt man sie 
in einer regelmäßigen Reihenfolge, so entsteht ein mehr oder 
weniger interessantes Muster, dessen ästhetischen Wert man 


in der Nähe von Tapeten einordnen kann. Spannend wird es, 
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ee, 


wenn man Zufall und Regelmäßigkeit miteinander verknüpft, z.B. 





so, daß keine Linie ins Leere mündet, sondern nur geschlossene 
Kurven entstehen (abgesehen vom Rand natürlich). Das ist wohl 
das allgemeinste Kriterium für Kunst: Die Information darf 
nicht zu groß (Chaos) und nicht zu klein (leeres Bild) sein. 
Bei einem Rätsel wird das klar: damit es interessant ist, darf 
es nicht zu leicht sein ("Wieviele Tage hat die Woche ?"), 
aber es darf auch nicht unlösbar schwer sein ("Welche Nummer 
steht im Telefonbuch unserer Stadt auf Seite If als erste ?")s 
damit es reizvoll ist, ein Rätsel zu lösen, muf man eine ge- 
wisse Chance haben, aber sie darf nicht Eins sein. Bei einer 
Melodie ist es ähnlich: Wenn man in jedem Moment genau weiß, 
wie sie weitergeht, ist sie langweilig und ahqaedroschen, 

kann man überhaupt nichts vorhersagen, gibt man das Raten bald 
auf. Am meisten Freude hat man, wenn man ungefähr weiß, wie es 
weitergeht,aber doch in Feinheiten immer etwas überrascht 
wird. Das Zusammenspiel von Überraschung und Bestätigung scheint 
eine große Rolle zu spielen. Für reizvolle Computergrafik (wie 
auch für Computermelodien und Computerlyrik) ergibt sich dar- 
aus die einfache Grundregel: Der Zufallsgenerator muß vorkom- 
men, aber er muß durch regelmäßige Strukturen oder Vorschrif- 
ten ergänzt werden. Anders gesagt: Die Freiheit des Zufalls 
muß in nicht zu enge Bahnen gelenkt werden. 

Wie wenig Information in einfachen Strichzeichnungen steckt, 
erkennt man sehr schön anhand von Programmen, die etwa in der 
Art von Fahndungs-Phantombildern Gesichter oder Wolpertinger 
(gemischte Fabeltiere) herstellen: Eine Zahl (von @ bis 7) 
gibt zum Beispiel die Länge des Halses an, eine andere die 


Augengröße usw. 
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"Spiel" ist hier im Sinne von "Wettbewerb um Punkte" gemeint. 
Eine oder mehrere Personen spielen; der Computer sagt jeden, 
was er tun soll oder darf, und führt die Punkte-Konten. Na- 
türlich fragt er zu Beginn nach der Anzahl und den Namen der 
Spieler und redet später jeden mit seinem Namen an. Am Schluß 
gibt er eine nach Punkten geordnete Siegerliste aus oder 
äußert sich sonst über das Verhalten der Teilnehmer. Wenn der 
Computer nicht nur "die Bank hält", sondern selbst spielt, 
erfordert das (außer für relativ triviale Spiele wie NIM, be- 
sonders einreihiges NIM) sehr pfiffige Programme, die eine 
schlagkräftige Strategie enthalten. Bei mittelschweren Spielen 
wie 4-Gewinnt oder Reversi gibt es durchaus BASIC-Programme 
von vertretbarer Länge, die eine eingebaute Strategie haben. 
Schachspielende Roboter tauchten bereits im 18. Jahrhundert 
auf, allerdings als "Fälschung", insofern als sie einen darin- 
sitzenden kleinwüchsigen Menschen (also mit Sicherheit etwas 
Besseres als ein "Elektronengehirn") enthielten. Noch vor we- 
nigen Jahrzehnten wurde ernsthaft behauptet, Schach sei für 
Computer viel zu schwer und zu kompliziert (wegen der gewal- 
tigen Verzweigungen schon im Verlaufe von wenigen Zügen). Heute 
gibt es zwar immer noch ein paar Menschen, die bessser als 
jeder Computer Schach spielen, aber viele verlieren nur des- 
halb nicht dauernd gegen ihren Computer, weil sie dessen Spiel- 
stärke drosseln können. Sie wissen sicher, daß es auch für 

den VC 28 spielstarke Schachprogramme gibt, die natürlich in 
Maschinensprache geschrieben sind. 


Viele Spielprogramme, die Sie in gedruckten Programmsammlungen 
finden, sind zwar in BASIC, aber nicht für Bildschirmcomputer 
geschrieben oder nur sehr oberflächlich für ihn umgeschrieben. 
Sie schreiben meistens das ganze Spielfeld nach jeder Eingabe 
neu (wie es bei Computern mit Drucker und ohne Bildschirm ja 
auch nicht anders geht). Sie können das etwas eleganter machen: 
Nehmen Sie z.B. nur die obersten Zeilen für INPUT und kehren 
Sie mit HOME vor jedem INPUT dorthin zurück, Die Änderungen der 
Situation auf dem "Spielbrett" können dann mit PRINT oder POKE 


ohne Löschen des ganzen Bildes vorgenommen werden. 


Was man an einem Tisch (im Gegensatz zu einem Sportplatz) 
spielen kann, läßt sich auchmeistens auf einen Bildschirm- 
computer übertragen. Es gibt ganze dicke Bücher über die 
verschiedenen Spiele, und sie geben eine Fülle von Anre- 
gungen zum Programmieren. Je nachdem, wovon das Gewinnen 
eines Spieles abhängt, kann man die einzelnen Spiele einer 
oder mehreren der folgenden Gruppen zuordnen: 


I. Strategiespiele vom einzeiligen NIM (Jeder darf abwech- 
selnd von einem Haufen ] bis 3 Steine wegnehmen; wer den 
letzten nehmen muß, hat verloren) bis zum "königlichen" 
Schach: Hier kommt es auf vorausschauende Intelligenz an, 
bei den einfacheren auch ganz entscheidend darauf, wer 
anfangen darf oder muß. Solche (einfachen) Strategiespiele 
sollte man so anlegen, daß nach jeder Runde die Aufforderung 
zum Anfangszug vom Computer richtig adressiert wird und daß 
die Punktezählung dabei weiterläuft. Spielt der Computer 
selbst mit, kann er auch mitteilen, ab wann der Mensch 

durch einen Fehler seinen bis dahin sozusagen sicheren Sieg 
verschenkt hat (das ist z.B. beim mehrzeiligen NIM möglich, 
bei dem beliebigviele Steinchen, aber mehr als @,aus genau 
einer Zeile entnommen werden müssen; ob der ]. oder der 2. 
Spieler bei fehlerfreiem Spiel gewinnt, hängt von der Anfangs- 
verteilung der Steinchen auf die Zeilen ab). 
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Das Programmieren von Strategiespielen ist im allgemeinen 
kompliziert; selbst die Übertragung der Spielregeln in ein 
Programm, das nur das Spiel mehrerer Menschen organisiert, 
überwacht und bewertet (und natürlich auf den Bildschirm 
bringt), ist (z.B. schon für Mühle) nicht ganz einfach. 





2. Glückspiele . Während es bei Strategiespielen nur auf 

die Intelligenz ankommt, spielt sie hier gar keine Rolle 
(bei den "reinen" Glückspielen). Es ist klar, daß der 
Zufallsgenerator RND(8) hier die entscheidende Rolle spielt. 
Denken Sie bitte daran, daß RND(8) mindestens zu Beginn 
eines solchen Programms vorkommen muß: RND (1) erzeugt nach 
jedem Einschalten des Gerätes nacheinander die gleichen 
"Zufallszahlen", Das ist natürlich äußerst unfair, weil 

der Kenner des Programms sich die Reihenfolge der gewürfel- 
ten Zahlen dann bald merken kann. Die Programme sind im 
Prinzip extrem einfach; man kann natürlich sehr viele Zutaten 
bringen (Kontoführung, Roulette-Tischmi:tt Bezifferung, aku- 
stisches Rollenlassen der Kugel, Anzeige der durchlaufen- 
den Zahlen bei einem "einarmigen Banditen" usw.). Sicher 
sind reine Glückspiele langweilig, wenn es nicht um Geld 
geht, und gefährlich, wenn es darum geht. Man kann aber 

auch an ihnen demonstrieren, daß Spielsysteme nicht funktio- 
nieren (z.B. das System, auf Rot den kleinsten Einsatz zu 
setzen, den Einsatz bei jedem Verlust zu verdoppeln und bei 
jedem Gewinn wieder ganz klein anzufangen). Unter uns: Wenn 
ich ein System hätte, würde ich kein Buch darüber schreiben, 
sondern die Spielbanken sprengen. 
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3. Gedächtnisspiele. Hier sind Zahlen, Bildsymbole, Wörter 
oder Melodien, die der Computer vorführt, nach einer gewissen 
Zeit wiederzuerkennen oder zu benennen und mit den Tasten 
anzugeben. Natürlich kann bei Gedächtnisspielen der Zufall, 
der gelegentlich ein besseres Gedächtnis vortäuscht, nie ganz 
ausgeschlossen werden; das gleicht sich aber nach längeren 
Spielfolgen aus. Ein Spiel, das gleichermaßen bei der Auf- 
stellung des Programms wie beim Spielen Spaß macht, ist ein 
Bilder-Memory: Vorbestimmte Bilder sind unsichtbar und zu- 
fällig über den Bildschirm verteilt (z.B. im Raster 7 x 7 
Bilder aus je 3 x 3 Buchstabenfeldern). Die Spieler werden 
der Reihe nach aufgefordert, zwei Bilder (durch Anwahl der 
Rasterzahlen mit GET) "aufzuklappen". Der Computer zeigt 

sie dann an den entsprechenden Stellen. Wer zwei gleiche 
Bilder (denn fast jedes Bild kommt zweimal vor) findet, 
bekommt einen Punkt und eine akustische Belohnung. Am Schluß 


zeigt der Computer die Rangfolge der Spieler, die abgelau- 
fene Zeit und die Zahl der benötigten Aufklappvorgänge an. 


N 


Eine andere Form des Gedächtnisspieles ist als Kinderspiel 
"Ich pack' in meinen Koffer: ..." und als Spielgerät "Senso" 
bekannt: Eine Kette aus zuerst nur einem Wort, einem Ton, einer 
Farbe oder einer Ziffer, wird von Mal zu Mal um ein Element 
länger (natürlich per Zufallsgenerator); der Spieler muß 
jedesmal die ganze Folge aus dem Gedächtnis eintippen. 


Die Gedächtnisspiele sind nicht nur ein gutes Training für 
die Konzentration, sondern gestatten auch dem Programmierer, 
seine ganze Phantasie in die Auswahl und Gestaltung von 


8 


Wörtern oder Bildern zu legen, nicht nur bei eigenen Pro- 
grammen, sondern auch bei anderen, wenn die LIST zugänglich 
ist. Noch ein Tip: Seien Sie nicht traurig, wenn Sie gegen 


kleine Kinder verlieren: die können das wirklich besser ! 


4.Geschicklichkeitsspiele. Hier geht es meist darum, recht- 
zeitig ae richtige Taste (oder den Joystick in die beste 
Richtung) zu drücken. Reaktionsgeschwindigkeit ist dabei 
meist sehr wichtig, oft muß man aber auch gewisse Bewegungs- 
abläufe abschätzen und einkalkulieren. In kommerziellen 
Spielen sieht das meist sehr kriegerisch aus, aber ein schnell 
laufender gefräßiger Wurm, der durch erfolgreiches Fressen 
immer länger wird, oder ein Autorennen, bei dem physikali- 
sche Gesetze zu beachten sind, sind auf lange Sicht meist 
mindestens ebenso spannend. Praktisch alle Spiele in den 
elektronischen Spielhöllen sind in diesem Sinne Geschicklich- 
keitsspiele (ein VC 20 amortisiert sich da sehr schnell). 


FEiHHEHN FAHH ER ÜEFRIGEHS PAUcH 
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Für viele wissenschaftliche Themen wird man den VC 29 als 
Hilfsmittel zur Ausführung numerisch-mathematischer Methoden 
verwenden, also von Rechnungen, die entweder in kleinen 
Schritten voraehen oder stufenweise immer bessere Genauig- 
keiten erreichen. Viele Anleitungen dazu finden Sie in den 
Programmsammlungen, die es für BASIC (ohne Bindung an be- 
stimmte Computertypoen) und für programmierbare Taschenrechner 
gibt. Vergessen Sie dabei aber nicht, die Dialogfähigkeit 

und aie Möglichkeiten zur grafischen Ergebnisausgabe zu nutzen, 
wie sie Bildschirmcomputer im allgemeinen und der VC 2ß in 
besonders hohem Maße hat (sonst mißbrauchen Sie den VC 29 
fast als programmierbaren Taschenrechner, nutzen ihn jeden- 


falls nicht angemessen aus !). 


Besonders günstig sind Simulationsprogramme, bei denen ein 

. zeitlicher Vorgang aus den Bereichender Natur-, Sozial- oder 
Wirtschaftswissenschaften so behandelt wird, daß wichtige 
Kenngrößen in der richtigen zeitlichen Reihenfolge aufein- 
ander aufbauend berechnet werden, gegebenenfalls mit Berück- 
sichtigung von Eingaben, die man während des Programmlaufs 
machen kann (Kraft- oder Spannungsstöße in der Physik, Zugaben 
von Reagenzien inder Chemie, Aktienkäufe bei einer Börsen- 
Simulation, Änderung der Geburtenziffer bei Bevölkerungs- 
pyramiden usw.). Anregungen hierzu erhalten Sie am besten 
bei der Lektüre von Lehrbüchern der einzelnen Wissenschaften: 
Benutzen Sie Ihren Computer, um grafische Darstellungen zum 
Leben zu erwecken |! 


Einige Beispiele folgen ab Seite 15). 


Wie genau ist Ihr VC 28 eigentlich ? 


Wenn es sein muß, unendlich genau. Nicht etwa nur bei den 
Aufgaben, die glatt aufgehen. Mit "unendlich" ist natürlich 
(wie sonst auch) gemeint: Es gibt keine Grenze, die nicht 
überschritten werden könnte. Das folgende kleine Programm 
führt eine relativ einfache Rechnung* beliebig genau aus, 
wenn Sie zwei ganze Zahlen eingeben: 

18 INPUT Z,N 

28 IF N=<Z THEN 49 

308 PRINT CHR$(48+B);,:2=2*10:B=9:G0T0 20 

48 Z=Z-N:B=B+1:60T0 29 


In dieser einfachen Form zeigt es allerdings keinen Dezimal- 
punkt an. Die IA in Zeile 39 können Sie auch gegen eine 
andere Ziffernsystembasis austauschen; die ASCII-Zeichen 
in Zeile 30 sind natürlich die Ziffern; für Basen größer als 


18 müßte man hier noch Ergänzungen einbauen. 


* Welche könnte das sein ? 


HICHTS FÜR SIMULAHTEH 


. = ii, e* u_- 2 - - — 
be=-i=sriele- fur Zimalatı nen 





Zur Simulation physikalischer Vorgänge sollen hier nur 
drei Beispiele dienen: ein Reschleunigungsspiel in einem 
Labyrinth, der Wettlauf zwischen Besen und Kugel beim Fallen 


und ein Heiz- und Kühlsystem mit einem einfachen Thermo- 


staten. - Das Beschleunigungsspiel benutzt den Joystick 


zur Eingabe der Beschleunigungsrichtung (8 Richtungen und 
Aus-Stellung). Ein wandernder Punkt (Raumschiff mit 4 An- 
triebsdüsen) wird damit durch das Labyrinth befördert, 
natürlich möglichst schnell (Zeitangabe in Sekunden). Die 
Geschwindigkeit wird oben im Bild grafisch angezeigt. Bei 
einer Kollision mit einer Wand startet das Programm uner- 
bittlich neu. Die hier abgedruckte Version ist betont 
schlicht gehalten. Sie können noch ein akustisches Tacho- 
meter zufügen und eine Siegesfanfare im Zielgebiet. Weitere 
Vorschläge: Punktestand bei mehreren Spielern, die abwech- 
selnd lenken, austauschbare Labyrinthe usw. 
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Worin besteht nun die Simulation ? In den Zeilen 289 bis 


283 werden die 4 Richtungskomponenten (oben, unten, ]links, 


rechts) des Joysticks abgefragt: sie wirken sich sogleich 


als Änderungen der entsprechenden Geschwindigkeitsanteile 


(also als Beschleunigung) aus (die Zeitintervalle werden 


dabei als gleich angesehen, was sie hier gar nicht sind). 


Die Ortsänderungen ergeben sich in Zeile 22@ aus den Ge- 


schwindigkeitskomponenten: Die ganze Physik besteht dabei 


1 

158 
161 
IH 
193 
14 
185 
106 


pe a 
PImm m n 
GDC aid 


0m 
C 
ar 


Zu 
Al 
2H2 
ea 
235 
287 
2GE 
218 
ale 
215 
217 
22: 
225 
za 
zdn 


3 CHAR 


GEAFHIT 
SHÄR 
IHAR 
Ü:HAR 
CHAR: 
CHAR 
CHAR 
ÜHAR 


Yen!‘ 


. .- 


Zap Su DNB DGR 


- > .- - v 


CHAR 
CHAR 
CHAR 
: CHAR: 
CHAR 
CHAR 14. 

CHAR 15. 
CHAR 16. 
CHAR 17, 
CHAR 18, 
CHAR 19. 
T1=TI:CH 
VRad: Yr= 

IF RIOTC 
IF RIC! 


GR DDMNIMTIN A d 


> = 


mn 


IF RJC'Y« 
IF RIOWY« 
V=5arRiyr 
DE All D u 
DRAU 2. 
FOIHT A, 
ed i Fü 
IF RDAT« 
HE« AT 

en en Be Y 
POIHT 2, 
T=.TI-Ti 
GOTÜ 208 


253 REM BESCHLEUNIGUNG IM LABTRIHTH 


COLOR 1.1.6,6 

n DT 1 „ 
| I | I" 
| I I I" 
| Nana | IK 
1 Kirk 
| |. SE 
| | | nt 
1 1 
| I 1" 
| [2 
| [;? 
| 


u 
= 
“l 
| 
e 
"1 
a 
sl 
"l 
„N 
"N 
"| 


% == en a | | „ 
| n 


A, 2 
a, | 
Bu 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


MH. 18. [" 
3," | 1 
4, \ l a l In 
AR aa. 
3:4=80:7=356 
> AND 1 THEN Vr=uy-1.5 


ne 


1 
79) AND 2 THEH Yyayy+l,5 


3) AHI 4 THEH YE=V-1 
a) AHD © THEN VH=YEHl 
ta4y7 42) 

2388.30 TO 1623.20 
394,38 T0 300+Y#19,38 
A T:FOINT 0,8, 745.4 
R I=1 TO 4 


TH TE WISE THEN RUM 


rer 
" MT: FOIHT Bu ‚Y+6.4 
259: CHAR 9,5. STRECINTET:N 





also aus der Anwendung der Definitionen von Geschwindigkeit 
und Beschleunigung. Wie groß die Beschleunigung jeweils 
ist, wird vom Spieler ganz willkürlich (in dem groben 
Raster des Joysticks) festgelegt, und zwar in jedem Augen- 
blick neu: Das Fahrzeug hat sich danach zu richten. 


Das zweite Simulationsbeispiel handelt von einem Besen(-stiel), 
der schneller umfällt als eine aus der gleichen Höhe fallende 
Kugel für den Fall braucht. Nach der Eingabe des Startwinkels 
(gegen den Boden gemessen) zeichnet das Programm den Vorgang 
in einzelnen Momentbildern, bis eins der beiden Objekte am 
Boden angekommen ist. Bei kleinen Winkeln ist der Besen durch- 
aus schneller, was einigermaßen erstaunlich ist. Wenn Sie 

Wert auf genauere Ergebnisse legen, sollten Sie das Zeitin- 
tervall DT wesentlich kleiner machen; die Zeitlupe wird dann 


allerdings auch stärker, d.h. das Programm dauert länger. 


En REM BESEH UHD KUGEL FALLEN UM DIE WETTE 
1505 INPLIT"STARTWIHEEL "34: Heller /180 

193168 H=3IH<W3:L=1:MA=1:6=-9,8:0T=,.87 

1138 GREAFHIL 2 

121@ POIHTZ. 3809, 1923-H#1366 

1228 DRALU 2, 184,1923 TO 1AB+EBEFCOS.W>. 1923-1BBO#HS INCH) 
1230 DN=ENSCHWIEL/2EMAFG 

12420 UE=STDM’MA/LT2%3 

12398 WG=bIG+WUB#EDT 

1268 W=W+WG&DT 

1270 Y=eu+GKkDT 

1236 H=H+W&DT 

1239 IF WER AND H>B G0TO 1218 


O)) 


Zum Verständnis des Programms muß man mit Begriffen wie Dreh- 
moment, Trägheitsmoment, Winkelgeschwindigkeit, Winkelbe- 
schleunigung usw. bekannt sein. Im Programm erscheinen nur 
die einfachsten Zusammenhänge dieser Größen untereinander 
(insbesondere ihre Definitonen); trotzdem zeigt uns das Pro- 
gramm ganz klar, daß ohne die Annahme von Zauberkräften al- 
lein aus diesen bekannten physikalischen Gesetzen das selt- 


same Verhalten zu erklären ist. 
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Das Programm "Thermostat" zeigt ein Haus mit drei Tempera- 
turskalen: innen für den Sollwert (S) und den Istwert (I), 
außen für die Störgröße "Außentemperatur". Im Programmtext 
heißen sie TS, TH und TA (TI ist nicht zulässig !). Ein 
Heizgerät H und ein Kühlgerät K schalten sich ein und aus, wenn 
gewisse Abweichungen der Ist- von der Solltemperatur über- 
schritten werden; im übrigen wirkt die Außentemperatur auf 
den Istwert innen ein (Wärmeleitung). Das Einzige, was Ihnen 
außer dem Zuschauen bleibt, ist das Verstellen von TA und TS 
mit den vier Funktionstasten (Dauerfunktion !). Schaffen die 
Geräte die Regelung auch in extremen Fällen ? Im größeren 
rechten Teil des Bildes werden alle drei Temperaturen höhen- 
gleich zu den Thermometersäulen wie in einer Fieberkurve mit- 
geschrieben. Das Ganze scheint sehr kompliziert zu sein, das 
Programm ist aber (jedenfalls in der hier gebotenen einfachen 
Fassung) durchaus überschaubar: 


180-126 Zeichnung 

169-170 Anfangswerte 

200-204 Abfrage der Funktionstasten für Änderungen von TS und TA 

210-242 Auftragung der Temperaturen als Thermometersäulen und 
als Punkte im Zeitdiagramm 


250 

260-265 
210-273 
280-238] 


290-309 
310 


a a Hi A 
Fl PAR Pr fl lm em m a Sr 
MON PA ip Gil 


za 


ae Dad iR 
SoVeG@m Sir ini 


Wr RO PO RODIRIPITO AO TO PUTOR 


4 DREAM 9,3 
3 FÜIHT 2.T.1880-T5 
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wärmeleitung (so einfach geht das ! 


Wirkung von Heizung und Kühlung 


) 


Ein- und Ausschalten von H und K bei 


Anzeigen von H und K im Bild 
l+2*K schreiben: 


bzw. 


2*H bzw. 


(Variante: 
3*K, 


die ausgeschalteten Geräte schwarz) 


den Schaltpunkten 
statt 1I+H 


dann erscheinen 


Fortschreiten auf Zeitskala und spaltenweises Löschen 


Rücksprung zum Schleifenanfang 


ne THERMISTAT 


GRAPHIC IL 
REGIÖH 5 


-DLOR 1. 


3,142 


CHAR 3,1, "CHAR 5:1, "H" 
CHAR 13.1." CHAR 12.1. "E" 
CHAR: 17,1."8 Ir 

CHAR 2.3, "THERMÖSTAT" 

REISI ÜH = 

DRAN zZ, 8.1823 TO 202.1922 
IRA 2, G.18lE TO 288. 1018 
IRA 2, 5. 308 TO 8.1822 
DRAN 2,359. 308 TO 359. 1822 
DREAH &, 8, 358 TO 158. 13 
IFA 2,385. 308 TO 15%. hi 
T =4055:T1=459 

TA=d4ad: T5=20E 


E=-FEEH (203) 
IF E=33 
IF E=d4? 
IF E=55 AHD TS 

IF E=&3 AHI 3 
DRAU GB. 14.: 330 To 
DRALU 9.228,358 TO 
rA,308 TO 


AHL THA3 
Fan 


FOIHMT 3.T.16098-TH 
FOIHT 1,T,1949-TH 
TH=TH+«TA-TH3 10% 


ARHD TAZTAH 


6 


THEH TA=TA+18 
THEH TA=TA-18 
THEH TS =T=+18 


THEM 
148, 108- =] 9: 
ee, 
rk, 


IF H=1 THEH TH=STH+5 
IF K=1 THEM TH=TH-3 


IF TH2TS-28 THEH 
IF THTS-68 THEN 
IF TH>TS+28 THEN 
IF TH>TS+EM THEN 
FÜKE 33481. 1+H 

FÜKE 38521. 1+K#2 
T=T+3:T1=Ti+3 

IF T >1023 


K 

H: 
H 
K 


u 
De; 


‘ DT 


m Sir in 


THEN T =40# 
IF T131323 THEN Ti=4ag 


=T5-1 

DRAL 
12965-TH: DRAW 
199A-TR: DREAM 


DREAM A,T1,302 TO T1.1823 


SOTO 240 


Ta 143, 1900 
TO z2A. 1A 
Ta 37a, 1a 


FIECHRUOCI UMNID DER GO _ DEHME TCHHITT 


Der größte Mathematiker des Mittelalters hieß Leonardo 
Pisano (d.h. aus Pisa), er wurde auch Fibonacci (gesprochen: 
fibonattschi) nach seinem Vater Bonacci genannt und lebte 
um 1200. Nach ihm ist eine Zahlenfolge benannt, die mit 9 
und ] anfängt und in der dann jede neue Zahl gleich der 
Summe ihrer beiden Vorgänger ist, also: 

18 A=-@:B=] 

28 PRINT A:IF B<>@ THEN PRINT TAB(9)A/B 

38 C=A+B:A=B:8=C:60T029 
Sie können auch A und B beliebig starten: 18 INPUT A,B 
(nur zwei Nullen sind wenig sinnvoll). Der Quotient A/B 
strebt recht schnel] gegen eine Konstante 9.618933989...=G 
die als Goldener Schnitt bezeichnet wird, da für sie gilt: 
(1-6)/G=6/1. Daß unsere Fibonacci-Folge gegen diesen Wert 
konvergiert, ist leicht einzusehen, wenn man als gegeben hin- 
nirımt, daß sie überhaupt konvergiert. Das ailt übrigens un- 
abhängig von A und B (sofern nicht beide gleich ® sind), 
auch negative A oder B sind zugelassen. Für den Fall, daß 
die 8 in der Folge vorkommt, ist jede Differenzenfolge (be- 
liebig hoher Ordnung) mit der Folge selbst identisch (aber 
natürlich etwas versetzt) (Eine Differenzenfolge entsteht, 
wenn man neben eine Folge die Differenzen der benachbarten 
Glieder schreibt; macht man das mit der Differenzenfolge 
wieder, so kommt man zur nächsthöheren Ordnung.) 


Als nicht sehr ernst gemeintes Beispiel dafür, daß man auch 
manchmal Programme, die nicht völlig trivial sind, in eine 
einzige Zeile quetschen kann, dasselbe etwas kürzer: 


Id PRINT X+1; TAB(9) (X+1)/(Y+2):2=X+1:X=Y+1:Y=Y+Z:60T0 19 
Da die Anfangswerte hier zwangsläufig beide @ sind, ist die 
Umbenennung in X+1 und Y+1 nötig. 
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EIH FROGFRHRIIDM 


f} 


Jr EIET 
3; IcH <FRST> :ELETSTT 


Wenn sich in einem BASIC-Programm Bilder schnell bewegen 
sollen, empfiehlt sich PRINT. Wir wollen einen Trickfilm 
einer (stehenden oder laufenden) Welle erzeugen, die mit 
den waagerechten Strichen der Tastaturgrafik gezeichnet 
wird, und zwar aus 3@ Momentbildern, die zyklisch nachein- 
ander in die gleiche Zeile geschrieben werden. Die Arbeit, 
die zugehörigen Codenummern zu berechnen und einzutippen, 
ist so recht für einen Intellekt, der fehlerfrei Kompli- 
ziertes rechnen kann, ohne sich über Stumpfsinn zu ärgern, 
für einen Computer zum Beispiel. Wir geben ihm zunächst 
eine Zeile mit genau 22 Leerzeichen oder Nonsenszeichen 
vor, am übersichtlichsten Ziffern: 

100 PRINT"1234567890123456789912Q"; 
Damit der Zeilenvorschub rückgängig gemacht wird, enthält 
der Text am Ende den "Cursor aufwärts". Überzeugen Sie 
sich mit dem direkten Befehl 

FOR 1=49896 TO 4150:PRINT PEEK(I):NEXT 
(ohne Erweiterung, bei 3 KB statt der 4096 die 1024, das 
Schleifenziel entsprechend) davon, daß die Ziffern zwischen 
den Gänsefüßchen (ihre ASCII-Nummern sind um 48 höher als 
die Ziffern selbst) bei 4183 anfangen (bzw. 3872 niedriger). 
Das BASIC-Programm beginnt im Speicher nämlich bei 4897 
bzw. 1@25. Dabei ist die Zeilennummer so codiert: Zuerst 
kommt der Rest bei Teilung durch 256, dann der ganzzahlige 
Quotient selbst (das sind also immer zwei Bytes, auch bei 
ganz niedrigen Nummern). Vor der Zeilennummer steht noch 
etwas sehr Praktisches: eine Sprungadresse zum Anfang der 
nächsten BASIC-Zeile, ebenfalls zwei Bytes (mit ihrer Hilfe 
kann ein Programm mit GOTO oder GOSUB springen, ohne die 
Zeilen alle selbst lesen zu müssen; es hangelt sich von einem 
Zeilenanfang zum nächsten). Am Schluß der BASIC-Zeile steht 
im Speicher eine ß. Schlüsselwörter wie PRINT werden mit je 
einem einzigen Byte gespeichert. Unsere Zeile 189 hat also 
außer den 22 Ziffern und den 5 anderen Zeichen noch 5 Bytes 
(2 für die Anschlußadresse, 2 für die Zeilennummer, eins für 
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die ®), insgesamt also 32 Bytes. Wenn wir nun die gleiche 

Zeile noch 29-mal mit aufsteigenden Nummern bis 129 eingeben 
(natürlich mit Überschreiben und Return-Taste), so sind ihre 
Einzelteile im Speicher jeweils um 32 Plätze versetzt. Damit 
wir auf diese Ziffern zugreifen können und sie gezielt durch 


berechnete Grafikzeichen-Codenummern ersetzen können, müssen 


diese Zeilen die mit den niedrigsten Nummern im Programm 
bleiben. Die folgenden Zeilen dienen jetzt dazu, aus den 
vorhandenen 38 Zeilen und einer 3]. 

132 GoTo 198 
das gewünschte Wellenprogramm zu machen. Sie berechnen 
für 22 verschiedene Ortspositionen und 3@ Zeitpunkte in- 
nerhalb der Periode die Wellenfunktion, suchen jeweils 
das dazu passende Grafikzeichen und POKEn es in den Pro- 
grammspeicher, und zwar genau an die Stelle der dort als 
Platzhalter dienenden Ziffern: 


200 DATA 164,210,198,192,195,196,197,163 
218 FOR I=® TO 7:READ A(I):NEXT 

228 FOR T=@ TO 29:FOR X=@ TO 2] 

239 Y=3.5+3.5*C0S(T*T/15-X*9V6) 

24% POKE 4103+32*T+X,A(Y):NEXT:PRINT T:NEXT 
258 PRINT'Z'" 

268 GOTO 198 


Bei Verwendung der 3-KB-Erweiterung (z.B. des Super-Expanders) 
ist statt 41803 zu nehmen: 1931) 


Gestartet wird mit RUN 288, damit zuerst die Grafikzeichen 
(die aus dem ASCII-Code in Zeile 289 zusammengestellt sind) 
errechnet und eingesetzt werden. Die Zeilen 19 bis 129 
bilden nun eine Schleife aus 3@ PRINT-Anweisungen, die alle 
das gleiche Wellenbild, aber jeweils um 1/38 Periode ver- 
schoben, enthalten. Es wird stets in die gleiche Zeile ge- 
schrieben, so daß ein Trickfilm entsteht, in dem eine Welle 
von links nach rechts läuft. Sie können nun in Zeile 239 
Änderungen vornehmen und neu mit RUN 288 starten, z.B. 

die 6 gegen andere Faktoren vertauschen und damit die Wellen- 
länge ändern. Wenn Sie das Vorzeichen - dort in + ändern, 
läuft die Welle von rechts nach links. Sie können auch eine 
sogenannte "stehende Welle" (was in Wirklichkeit ein Schwin- 
gungszustand mit ortsfesten Ruhepunkten ist) erzeugen, indem 
Sie schreiben: 230 Y=3.5+3.5*C0S(T*n/15)*COS(X*R/6). 
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BASIC-Schlüsselwörter werden im Speicher als jeweils ein 
Byte festgehalten , wobei die Nummer stets größer als 127 
ist; das zugehörige Zeichen im Bildschirmcode erscheint revers. 
(mit FOR I=@ TO 18M:A=PEEK(1@24+1):PRINT A;:NEXT können Sie 
die Bytes als Zahlen ausdrucken (ohne Expander: ab 4996), 
in komprimierter Schreibweise mit: 

FOR I=@ TO 3@B:A=PEEK(1024+1):POKE 7689+1,A: 

POKE 38409+1,6:NEXT 
wobei Sie zum besseren Lesen auf den zweiten Zeichensatz 
umschalten sollten (SHIFT & (C9 drücken). 


Beim Eingeben eines BASIC-Programms brauchen Sie nicht un- 
bedingt die ganzen Schlüsselwörter zu tippen, stets genügen 
maximal 3 Buchstaben, meist ist der letzte mit SHIFT zu 
tippen. In den folgenden Listen wird angenommen, daß Sie 
dabei den zweiten Zeichensatz verwenden (Klein- und Groß- 
buchstaben). 


1. Funktionen mit Dummy-Argumenten, z.B. (8) 


Die Spalten bedeuten der Reihe nach: 

a) normale Bezeichnung, b) kürzeste Form bei der Eingabe 
(hier im zweiten Zeichensatz dargestellt), c) Code-Byte 
d) Bildschirmzeichen zum Code-Byte, revers zu verstehen, 
e) kurzer Hinweis auf die Bedeutung 


a b c de 
FRE FR 184 8 freie Bytes für BASIC 
POS pos 185 9 aktuelle Spaltennummer 


nur mit Super-Expander: 


RGR rG 219 -+ aktueller Grafikmodus 
RJOY rJ 220 Eu Joystick-Ablesung und rote Knöpfe 
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2. Funktionen von Zahlen, die selbst Zahlen liefern 


ABS aB 182 6 Absolutbetrag 
ATN atn 193 A Arcustangens (im Bogenmaß) 
cos cos 198 >? Cosinus (vom Bogenmaß) 
EXP ex 189 = Exponentialfunktion zur Basis e 
INT int 18] 5 nächste nichtgrößere ganze Zahl 
LOG log 188 <& Logarithmus zur Basis e 
PEEK pE 194 R Inhalt des Speicherplatzes 
RND rN 187 ; Zufallszahl: RND(@®) zeitabhängig, 
RND{]) nur reihenfolgenabhängig 
SGN s@ 188 4 Vorzeichen: -1,8,] 
SIN sI 191 ? Sinus (vom Bogenmaß) 
SQOR s0 186 : Quadratwurzel 
TAN tan 192 _ Tangens {vom Bogenmaß) 
USR us 183 7 Maschinen-Unterprogramm als Funktion 
nur mit Super-Expander: 
RCOLR rt 218 Z vorgewählte Farben Nr. @® bis 3 
RPEN rpE 216 X Position des Lichtgriffels: 
X=RPEN(9) Y=RPEN(]) 
RPOT rP 215 W Stellung der Potentiometer @ und ] (Paddle) 
RSND rS 217 Y Abfrage der Tongeneratoren ] bis 4 und 


der Lautstärke (5) 
3. Funktion von zwei Variablen (nur mit Super-Expander): 
RDOT 3) 221 [D Farbe im Koordinaten-Gitter bei X,Y 
ist RDOT(X,Y) 


4. Stringfunktionen von Strings und Zahlen 

LEFT$ leF 280 H LEFTS("ABCDEF",2) ist "AB" 
MID$ mI 2%2 J MID$C"ABCDEF",4,2) ist "DE" 
RIGHT$ rI 201 I RIGHTEÜ"ABCDEF",2) ist "EF" 


5. Stringfunktionen von Zahlen 


CHR$ cH 199 G Zeichen zum ASCII-Code 
STR$ stR 196 D Zahl als Zeichenkette 


6. Zahlenfunktionen von Strings 


ASC 
LEN 
VAL 


7. Anweisungen 


DEF 
DIM 
END 
FN 


FOR 
GET 


GET# 
GOSUB 
GOTO 
IF 
INPUT 


as 
len 
vA 


+ 


Von HH 


c10 
EiE 
cM 
co 
dA 


de 
dI 
eN 
fn 


fo 
gE 


gE# 
goS 
gO 
Tr 
input 


198 F ASCII-Codenummer zum Zeichen 

195 C Länge einer Zeichenkette 

197 E (Anfang einer) Zeichenkette als Zahl 

und Verknüpfungen: 

178 * Addition der Ausdrücke davor und danach 

171 + Subtraktion (entspr.) oder Vorzeichen 

172 ,„ Multiplikation 

173 - Division 

174 . Potenzierung 

177 94 Vergleich: ob links größer als rechts 

178 2 Vergleich: ob links und rechts gleich 

179 3 Vergleich: ob links «kleiner als rechts 

175 / logische Konjunktion (UND) 

160 [l Schließen eines Files 

156 £ Löschen der Variablen 

157 ] lenkt PRINT auf externe Geräte um 

154 x abgebrochenen Lauf fortsetzen 

131 c die folgenden Zahlen oder Strings gehören 
zum Datensatz (für READ) 

158 v es folgt die Definition von FN 

134 f Platzreservierungen für indizierte Variable 

128 @ Ende des Laufs (ohne Meldung der Zeile) 

165 % Anfang der Bezeichnung einer selbst- 
definierten Funktion, z.B. FNY 

129 a Schleifenanfang 

161 ! holt ein Zeichen aus dem Tastaturpuffer 
(falls er nicht leer ist) 

161335 empfängt ein Zeichen von externem Gerät 

141 m Sprung mit Gedächtnis zur Rückkehr 

137 i Sprung zur angegebenen Zeilennummer 

139 1 es beginnt Bedingung für THEN 

132 d (Schreiben eines Textes und) Warten auf 


eine Eingabe, die der angegebenen 
Variablen zugewiesen wird 


INPUT# 


LET 


LIST 


LOAD 


NEXT 


NOT 
ON 


OPEN 
DR 


POKE 


PRINT 


PRINT# 
READ 
REM 
RESTORE 


RETURN 
RUN 


11 


10 


nE 


new 


nO 
on 


or 


pO 


PR 
rE 
rem 


reS 


reT 
ru 


136 


155 


147 


139 


162 


168 
145 


159 
176 


15] 


152 
138 
143 
148 


142 
138 


- oo 0 x 


Empfang einer Zahl oder eines String 
von einem externen Gerät 
es folgt eine Wertzuweisung (dieses 

ist entbehrlich) 


Auslisten des BASIC-Programms, 


Schlüsselwort 

ganz 
oder in den gesetzten Grenzen 

Einlesen eines Programms von der Ton- 
bandcassette oder der Diskettenstation, 
zugleich Löschen eines alten Programms 
im Rechner 


Schleifenindex wird um 1 oder den bei 
Rück - 
(FOR) 
(betrifft 


STEP angegebenen Wert erhöht, 
sprung zum Schleifenanfang 
Löschen eines BASIC-Programms 
nicht Maschinenprogramme) 

logische Verneinung des Folgenden 

gemäß dem folgenden Wert wird die Sprung- 
adresse für folgendes GOTO oder GOSUB 
gewählt, z.B. ON X GOTO 189,209,388 
bewirkt für X=2 Sprung nach 299 


öffnet File für Dialog mit externem Gerät 


logische Adjunktion 
des ODER) 


(nichtausschließen- 


POKE a,b belegt Speicherplatz a mit 

(d bis 255) 
schreibt auf den Bildschirm Inhalt von 
(mit ") Klartext 
schreibt auf externem Gerät 


dem neuen Inhalt b 
Variablen oder 


Zuweisung aus dem DATA-Paket an Variable 

der Rest der Zeile wird ignoriert 

Zeiger für READ wird auf Anfang des 
DATA-Stapels gesetzt 

Rücksprung hinter letztes GOSUB 

startet BASIC-Programm 


SAVE 


SPC! 


STEP 


STOP 
SYS 


TAB( 


THEN 


TO 


VERIFY 


WAIT 


Tr 


sA 


sp 


stE 


sT 
sY 


tA 


tH 


to 


vE 


wA 


TT 
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148 t schreibt BASIC-Programm auf Tonband- 
Cassette oder Diskettenstation 

166 & überspringt beim Schreiben Plätze (setzt 
aber keineswegs Leerzeichen !) 

169 ) Schrittweite für Laufindex in FOR-Schleife 
(auch negativ) 
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158 T Sprung in Maschinenprogramm, das bei dem 


Ende des Laufs mit Meldung der Zeile 


Oo 


angegebenen Speicherplatz beginnt 

163 & Sprung beim Schreiben in angegebene 
Spalte (nur falls nach rechts) 

167 ‘ Sprung zur nächsten Zeile, falls zwischen 
IF und THEN 8 steht, z.B. nichterfüllte 
Bedingung, sonst Sprung in Zeile, die 
hinter THEN steht oder Ausführung aller 
Anweisungen hinter THEN 

164 $ steht zwischen Anfangs- und Endwert des 
Laufindex hinter FOR 

149 u Vergleich, ob Programm im Speicher gleich 
dem auf Band oder Diskette ist (OK bzw. 


ERROR) 
146 r Unterbrechung des Laufs, bis in einem 


anzugebenen Speicherplatz eine anzu- 
gebende Bedingung eintritt (wird kaum 
jemals benötigt). 


255 Konstante 3.14159265 


8. Spezialanweisungen des Super-Expanders (Grafik _ und Musik) 


CHAR 
CIRCLE 


COLOR 
DRAW 


GRAPHIC 


KEY 


chA 


cl] 


coL 


dR 


gR 


KE 


213 U Schreiben von Text: CHAR z,sp,t$ 

287 0 Ellipse: CIRCLE f,x,y,rx,ry 
Ellipsenbogen: GIRCLE 1 ,X%,Yy,rX, rysWl14W2 

218 R Vorwahl der 4 Farben COLOR fa@,f1,f2,f3 


208 P Gerade: DRAW f x1,y1 TO x2,y2 
oder: DRAW f TO x2,y2 


2085 M Ein/Aus-schalten der Feingrafik (2) 
oder Multicolorgrafik (1), Kombination 
beider (3), zurück zu Schrift (4) 


2087 0 Belegung der Funktionstasten 
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PAINT pA 214 V Ausfüllen: PAINT f,x,y 

POINT pol 211 S Punkt zeichnen: POINT f,x,y 
REGION reG 289 Q Umschalten der Farbvorwahl f2 
SCNCLR sc 226 N Löschen des Grafikbildes 
SOUND s0 212 T Musik: SOUND t1,t2,t3,r,vo 


Die Abkürzungen für die Argumente in diesen Anweisungen sind 
als Gedächtnisstützen gedacht; ihre genaue Bedeutung sehen 
Sie bitte bei den einzelnen Beschreibungen oder in der Anlei- 
tung des Super-Expanders nach. 


SZ TELIERZETIICHEH IH 


DEH FRIIZI_LIFSTOHGEH 


71 LURSÜOR AUFURERTS" 
M CURSCOR ABWAERTE" 
N CURSOR LINKS" 
CURSOR RECHTS" 


’ 
=] HOME" 

\] CLRE = CLEAR HOME" 

8 IH5ST = INSERT" 

a ELHK SCHURRZ" 

4 LIHT WEISS" 

4 FED EOT" 

a CH CrAM" 

A FUR FURFUFR'" 

u GEH GRUEH" 

a BLU BLAU" 

ıd TEL GELE" 

2 RWS OH REVERSE EIM" 
m RS CFF REVERSE AUS" 
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TAHEELLEHN FÜR DIE EEHUTZUHG 
DER FESTEH GRFRAFIKZEICHEH 


Die Zeichen können auf drei Arten angesteuert werden: mit 
POKE und Bildschirmcode, mit PRINT und ASCII-Code (aufzu- 
rufen mit CHR$()) oder durch Schreiben mit der Taste in eine 
PRINT-Anweisung. Die Taste ist dabei entweder mit SHIFT oder 
mit der Commodore-Taste C=Jumzuschalten (Unterstreichung 
deutet im folgenden das letztere an). Einige Zeichen sind 
revers, sie haben eine eigene Bildschirmcode-Nummer für POKE, 
müssen aber bei PRINT mit REVERSE-ON vorbereitet werden. Im 
folgenden wird das durch Überstreichen angedeutet. 


Für die reversen Zeichen ist im Bildschirmcode jeweils 

128 zu addieren (bzw. abzuziehen, wenn das Vorbild schon 
revers ist), bei PRINT ist zwischen REVERSE ON und REVERSE 
OFF zu wechseln. 


l. Waagerechte Linien und Stufen 
leere ee 





POKE Ida 82 70 64 67 68 69 99 
CHR$ 164 21@ 198 192 195 196 197 163 
Taste @ m Sn go un 
I 
POKE Iıda 111 121 98 248 247 227 160 
CHR$ 164 175 185 162 184 183 3763 32 
Taste @?,. 0% ı UT T Teer 
mm un u 
POKE 99 119 120 226 249 239 228 160 
CHR$ 163 183 184 162 185 175 164 32 





|®| 


Taste Lk U oE WR 


2. Senkrechte Linien und Stufen 


POKE CHR} Taste POKE CHR$ Taste POKE CHR$ Taste 


I] ıeı 165 6 Pl ısı 165 6 DJ ı83 217 M 
Tl 84 212 T [ll ı1e 188 H I ı86 178 .N 
I: 2 1799 ©& (| 117 181 9 [N ıı8 182 L 
Il 66 194 B Bl 97 161 K [WM 225 161 «K 
IM 93 221 - ww 24 T82 IL DW 245 181 9 
[IM 72 200 H WM 232 170 N | 20a 188 H 
'D 89 217 Y WM 23 27m IM 223 T5 5 
FJ 183 167 M BE 160 32 Teer | 160 32 Teer 
3. Umrandungsstücke in Buchstabenmitte 
POKE CHR$ Taste 
[ea AI|I 85 73 213 22] u 1 
'WP]|ı 7a 75 292 203 y K& 
POKE CHR$ Taste 
[A Al| 112 110 176 174 AS 
u A1| ıe9 125 173.189 LK 
POKE CHR$ Taste 
J- 113 177 E 
Hl H 115 197 179 1:7] MW OQ 
F- 114 178 R 
POKE CHR$ Taste 
FM |sa 9ı 93| 192 219 221 er 
4. Umrandung am Buchstabenrand 
POKE CHR$ Taste 
rm1n7 ye 99 8% 247 163 208 0 1 P 
I —I| 9 103 | 165 167 & M 
D>OD 76 Iu8 122 | 284 164 250 ı @@ 


5. Diagonalen 
vYIRdN ‚8 86 77 | 246 214 205 NV M 


b. Pfeile nach 8 Richtungen 


POKE CHR$ Taste 
FROM 112 38 110 | 176 94 174 arts 
X D 6 62 60 62 < > 
ray) rm 1289 22 125 | 173 86 189 u 


7. Bausteine für die Viertelgrafik (vgl.S. 81) 


(die Verwendung der hier vorgeschlagenen Indices erlaubt 
eine sehr rationelle Verknüpfung mit Koordinaten) 


Lama, vi App 


Index A ] 2 3 4 ) 6 7 
POKE 32 126 124 226 123 97 255 236 
CHR$ 32 198 188 162 187 161 191 172 
Taste leer V c T ii K B D 
PuzE u. mE Mur 
Index 8 9181112 13 14 15 
POKE ıd8 127 225 251 98 252 254 160 
CHR$ 172 191 Tel 187 162 188 198 32 
Taste DB RK FE ı T TV Teer 


8. Dreiecke 


POKE CHR$ Tasten 
1 105. 95 | 169 223.1 .& 
[4 DD 233.1. 228 10% | © °E 
9. Halbe Felder 
POKE CHR$ Tasten 
mus 226 162 7 
W mM 97 225| 161 16] KK 
Kane 98 162 1 
10. Ganze Felder 
POKE CHR$ Tasten 


TIERE | >32 102 160 | 32 230 32 | leer + Teer 


Il. Kreise, Spielkarten etc. 


“co wei a le 


POKE 8ı 87 83 908 65 88 35 42 43 46 
CHRS 299 215 211 218 103 216 35 42 23 46 
Taste Q W S Z A XKROH + 


EATERWORLFRGEH FÜR GRAFIK 


Leider haben die Rastervorlagen im VC 20-Handbuch nicht das 
gleiche Seitenverhältnis wie der Bildschirm. Die hier abge- 
bildeten Vorlagen gelten für den normalen Betrieb bzw. für 
die Grafik des Super-Expanders (oder eine selbstgemachte 
mit der gleichen Speicherbelegung). Die Spalten ganz links 
zeigen die Speicherplätze für den linken Rand an, beginnend 
bei 768@ für die Zeichenform (Video-RAM) und 384g (Farb- 
RAM), für die anderen ist jeweils die Spaltennummer (@ bis 
21 bzw. bis 19) zu addieren. 


Bei der Super-Expander-Grafik sind diese Speicherplätze 
identisch mit den Regions, die in GRAPHIC 2 einheitliche 
"Tintenfarbe" bekommen und die man einzeln (ebenfalls mit 
REGION) auf Multicolor oder Feingrafik schalten kann. Die 
zugehörigen Koordinaten (für POINT usw.) sind ebenfalls 
an den Rändern angegeben, die Zahlen gelten jeweils für 
die linke obere Ecke jeder Region. Beachten Sie, daß im 
Grafikmodus zwar ins Bild gePOKEt werden kann, daß aber 


nicht ohne weiteres die Zeichensätze zur Verfügung stehen 
(vgl. Seite 119). 
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HIHWEISE Aur SurTWuArEe 


Natürlich wird jemand, der selbst programmiert, auch daneben 
fertige Programme benutzen.Vor allem wird es ihn reizen, sie 
abzuändern und aus ihnen zu lernen. Das geht bei Maschinen- 
programmen, die gegen das Auslisten gesichert sind, doppelt 
schwer, auch wenn sie zunächst durch gewisse Effekte beste- 
chen. Die Empfehlungen an dieser Stelle richten sich daher 

auf Programme, die in BASIC geschrieben sind und ohne weiteres 
ausgelistet werden können. In einigen Fällen ist das schrift- 
liche Begleitmaterial ebenso wichtig wie die mitgelieferten 
Programme: Lehrgangartig werden kleine Programme zeilenweise 
erklärt und inhaltlich begründet, die dann die wesentlichen 
Eigenschaften der fertigen Programme enthalten. Wenn Ihnen die 
(spärlichen) Programmbeispiele dieses Buches gefallen, kommen 
vielleicht einige Programme des gleichen Autors (ebenfalls 

im Lehrmittelverlag Hagemann, Düsseldorf) für Sie in Betracht: 


BESCHLEUNIGUNG Lehrgang mit Programmentwicklungen und Spielen 
von der einfachsten Bewegung bis zum Planetensystem 

SCHWINGUNGEN ] Mehrere miteinander verwandte Programme über 
Federpendel, gekoppelte Schwindungen usw. 

SCHWINGUNGEN 2 Überlagerung von Schwingungen, Modulationen, 
Fourier-Darstellung fast beliebiger Funktionen usw. 

ZUFALL Simulation eines GALTON-Bretts u.a. 

TÜRME VON HANOI Ein Denk- und Konzentrationsspiel, auch als 
Beispiel für die "vollständige Induktion" 

LACKMUS Simulation des Massenwirkungsgesetzes aufgrund der 
Reaktionsgleichungen am Beispiel eines Farbindikators 

THERMOSTAT Grafisch aufwendigere Variante zu dem Programm 
auf Seite 157 

GESICHTER Wenige Bits ändern die Form eines Gesichtes in einem 
scherzhaften Fahndungsbild (Anwendung der Informatik) 

ELEMENTE In einem Periodensystem werden vom Benutzer ausge- 
wählte Kriterien angezeigt 

MUSIK Harmonische Beziehungen von Akkorden und Tönen werden 
zugleich sichtbar und hörbar gemacht (Quintenzirkel), eine 
Zufallsmelodie kann während der Erzeugung nach Redundanz, 
Tonalität und Intervallgröße gesteuert werden. 
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1. Gebrauchsanleitungen, deren Renutzung parallel zu diesem 


Buch empfohlen wird, liegen dem VC 28 bzw. dem Super- 

Expander bei: 

vc 2@ YolksComputer “Handbuch Neu-Isenburg 1981 (Commodore) 

vc 28 VolksComputer Redienungsanleitung Super-Erweiterung 
Frankfurt/M 1982 (Commodore) 


2. Bücher speziell über den VC 20 mit Details über Speicher, 


Maschinenprogrammierung, Hardware-Anschlüsse usw.:! 


John Heilborn, Ran Talbott, VIC 20 User Guide, Berkeley 
(Calif.) 1983 (Osborne/McGraw Hil]) 

Andreas Dripke, VC 20 Spiele-Buch ], München 1983 (Interface 
Age) 

Karl-Heinz Heß, BASIC-Programme für CBM/VC 20 Computer 
Haar bei München 1983 (Markt & Technik) 

VC 20 Programme, Würzburg 1983 (CHIP Buch) 

Compute!'s First Book of VIC, Greensboro (NCarol.)1982, 
(Compute! Books) 

Winfried Hofacker, Programme für VC 20, Holzkirchen 1982 
(Hofacker) 

Gerhard Oetzmann, Lehr- und Übungsbuch für Commodore Volks- 
computer, Braunschweig 1983 (Vieweg) 

Angerhausen, Englisch, VC-20 intern (mit ROM-Listing), 
Düsseldorf 1983 (Data Becker) 

Angerhausen, Riedner, Schellenderger, VC-20 Tips & Tricks, 
Düsseldorf 1983 (Data Becker) 

VC 2@ VolksComputer Programmier Handbuch, Frankfurt/M 1982 
Commodore) 

vVIC 28 Progranmmer's Reference Guide, Indianapolis 1982 
(Commodore / Howard W.Sams & Co.Inc) 

Nick Hampshire, YIC revealed, Yeovil (GB) 1981 (Computabits Ltd.) 


2a Eine Beschreibung der auf den Commodore-Rechnern vorhande- 
nen BASIC-Version, also auch für den VC 28: 
Hannes Schießl, CBM-BASIC-Handbuch, München 1981 (Mediscript) 
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3. Praktische Einführungen in BASIC (nicht speziell auf den 
’C 28 zugeschnitten, aber auch für ihn geeignet): 


Rüdeger Baumann, BASIC Eine Einführung in das Programmieren 
1988 Stuttgart (Klett); dazu auch eine Aufgaben- 
sammlung 

Wilfried Schupp, Schüler programmieren in BASIC, Paderborn 
1988 (Schöningh) 

4. Sammlungen von Spielprogrammen, die als Ausgangsbasis oder 

Anregung für VC-2@-Programme dienen können: 


David H. Ahl (ed.) BASIC Computer Games, Morristown (NJ) 1978 
(Creative Computing Press) 
-, More BASIC Computer Games, Morristown (NJ) 1979 (Cr.C.Pr.) 


5. Bücher zur Mathematik, die als Anregung zum Programmieren 
en Zen zo Learn 
besonders geeignet sind: 


Werner Gilde, Siegfried Altrichter, Mehr Spaß mit dem 
Taschenrechner, Thun, Frankfurt/M 1980 (Deutsch) 

Roland Stowasser, Benno Mohry, Rekursive Verfahren, Hannover 
1978 (Schroedel) 

Karl Udo Bromm, Programmierbare Taschenrechner in Schule und 
Ausbildung, Braunschweig 1979 (Vieweg) 

Arthur Engel, Elementarmathematik vom algorithmsichen Stand- 
punkt, Stuttgart 1977 (Klett) 

Hans Bartel, Zahlentheorie und (Zahl)zeichensysteme, Würzburg 
1976 (Vogel/Kamprath-Reihe) 

Hans J. Stetter, Numerik für Informatiker, München 1976 
(Oldenbourg) 


6. Bücher zum Computereinsatz in Physik und Astronomie 
Reinhard Kunze, Rechenprogramme für den Physikunterricht, 
Köln 1982 (Aulis) (laufen direkt auf CBM 3981) 
Robert M. Eisberg, Mathematische Physik für Benutzer program- 
mierbarer Taschenrechner, München 1978 (Oldenbourg) 
G. Venz, Lösung von Differentialgleichungen mit programmier- 


baren Taschenrechnern, München 1978 (Oldenbourg) 


Peter Duffett-Smith, Practical Astronomy with Your Calculator, 
Cambridge (GB)21981 (Cambridge University Press) 
Eric Burgess, Celestial BASIC, Berkeley (Calif.) 1982 (SYBEX) 


6a. Schulbuch mit mehreren Programmen für den VC 28: 


Franz Bäder, Friedrich Dorn, Physik Oberstufe MS, Hannover 
1983 (Schroedel) (die Programme sind erstmalig in 
dieser Neubearbeitung enthalten) 


7. ein Biophysikbuch, das vielfältige Anregung zum Program- 
mieren bietet: 
Manfred Eigen, Ruthild Winkler, Das Spiel, München 1975 (Piper) 


8. einige Bücher zu speziellen Themen: 


Ryszard Zielinski, Erzeugung von Zufallszahlen, Leipzig 1978 
(VEB Fachbuchverlag) und Thun 1978 (Deutsch) 

Ludek Pachmann, Vas I. Kühnmund, Computerschach, München 1989 
(Heyne) 

Rainer Hahn, Höhere Programmiersprachen im Vergleich, Wies- 
baden 1981 (Akademische Verlagsgesellschaft) 


Abraham A. Moles, Informationstheorie und ästhetische 
Wahrnehmung, Köln 1971(DuMont) 

Herbert W. Franke, Phänomen Kunst (Die kybernetischen Grund- 
lagen der Ästhetik), Köln 1974 (NuMont) 


Ganz generell stecken die einschlägigen Zeitschriften voller 
Anregungen. Nehmen Sie sich aber auch Bücher über Inre son- 
stigen Hohbies vor und klopfen sie darauf ah, was als Basis 


zu einem Spiel- oder Demonstrationsprogramm geeignet ist ! 


pr 
m 
a 
; 
if 
v8 
E11 
«: 
cu 
1 
Po 
mau 
3: 


Dieses Register gibt zugleich knappe Worterklärungen oder 


andere Zusatzinformationen. 


verweisen auf die jeweils wichtigen Stellen. 


Die angegebenen Seitenzahlen 


Oft spielt das 


Suchwort auch noch auf den weiteren Seiten des gleichen 


Abschnitts eine wichtige Rolle, 


Abfragen (in Viertelgrafik) 
83 (Programm) 140 

Ableitung (Steigungsfunktion) 
32 

ABS() (Absolutwert,d.h. Weg- 
lassen des Vorzeichens) 163 

absolute Steuerung (bei PRINT- 
Grafik) 77 

affine Abbildung (eine be- 
stimmte Größen- und Form- 
änderung) (113) 

Anagramme (Wortspiel mit Um- 
stellung der Buchstaben)143 

Analog-Digital-Wandler (er- 
zeugt Zahlen aus stufenlo- 
ser Größe) 30 

AND (logische Operation UND: 
a UND b ist nur wahr, wenn 
a und b zugleich wahr sind, 
AND wird im VC 20 auch auf 
einzelne Binärstellen von 
Zahlen angewendet und er- 
laubt damit das Suchen nach 
einzelnen Bits) (11),34,55, 
164 

ASC() (Zuordnung der Nummer 
zu einem Zeichen nach dem 
ASCII-Code) 164 

ATN() (Arcustangens, Umkehr- 
funktion zu TAN) 163 

Auflösung (bei Feingrafik in 
Konkurrenz zu Multicolor) 
14] 

Ausgabe von Daten 7] ff. 


Balkengrafik (mit feinen Ab- 
stufungen in einer Dimen- 
sion und grober in der an- 
deren) 79 

BASIC (Programmiersprache) 3 


bedingte Anweisung (mit IF) 
64 (ohne IF:) 66 

Beschleunigungsspiel (Pr.)]153 

Besen (fällt schneller um, 
als eine Kugel fällt, wenn 
der Startwinkel klein genug 
ist, Simulationsprogramm) 
155 

Bilder-Memory (Spiel) 150 

Bildspeicherung (auf Band 
oder Diskette, in Feingra- 
fik) 115 

Binärzahlen (Zahlendarstel- 
lung nur mit den Ziffern fl 
und 1) 56 ff. 

Bit (einzelne Ziffer im Bi- 
närsystem, zugleich Ent- 
scheidung zwischen zwei 
Möglichkeiten. Sind diese 
(annähernd) gleich wahr- 
Scheinlich, ist der Infor- 
mationsgehalt ] bit) 5, 


Blume (Grafikbeispiel) 145 

UEDRPT (Grafikbeispiel) 

Boole, George (1815-1864, Be- 
gründer der formalen Logik) 
55 

Buchstaben (Formen im VC 20) 
90 (..und beim Drucker 
v6» 41525) 131 

Byte (8-stellige Binärzahl, 
besteht also aus 8 Bit, ge- 
deutet als Zahl von ® bis 
255, der Speicher wird ge- 
wöhniich nach Bytes ge- 
messen und durchnumeriert, 
I Kilobyte = IKB sind 1924 
Bytes = 8192 Bit) 5,1] 


C= (Commodore-Taste, zusätz- 
liche Umschalttaste für 
Drittbelegungen von 
Tasten) ]5 

Cassette (bei Speicherung von 
Feingrafik) 115 

Cassini, Jacques-Dominique 
(1747-1845, nach ihm die 
Cassini-Kurven, deren 
Punkte jeweils ein glei- 
ches Entfernungsprodukt zu 
zwei festen Punkten haben) 
E17 

CHAR (Anw. 
Text in Grafik-Bild) 
("hausgemacht":) 106 

Character ("Zeichen" wie 
Buchstabe, Ziffer usw.) 
a0 Eri% 

CHR$() (Zuordnung der Zeichen 
zu ihren Codenummern im 
ASCII-Code ) 163 (für die 
Grafikzeichen:) 166 

CIRCLE (Anw. zum Zeichnen von 
Kreisen oder Ellipsen(-Bö- 
gen) 111,166 

CLOSE (Gegenstück zu OPEN) 
164 

CLR (Löschanweisung für alle 
Variablen) 164 ("clear") 

CMD (Anwahl eines Ausgabege- 
rätes, "Command") 164 

COLOR (Vorwahl von bis zu 4 
Farben) 166 

Commodore-Taste vgl. C= 

Computer-Grafik 144 

CONT (Continue, Anweisung zur 
Fortsetzung eines mit der 
STOP-Taste unterbrochenen 
Programms) 164 


Control (CTRL, Umschalttaste 
für gewisse Drittbelegungen 
von Tasten: Farben, Reverse) 
15 

cos() 

CTRL 

Cursor 
dem Bildschirm) 
grammiert:) 73 


zum Schreiben von 
166, 


(Funktion Cosinus) 163 

vgl. Control 
(Positionsanzeige auf 

17 ipro- 


DATA 
len oder Texten 
gramm) 35, 164 


(Ablage von festen Zah- 
im Pro- 


Datenspeicher (Progr.) 140 

Dauerfunktion (von Tasten) 20 
(mit PEEK:) 28 

DEF (Anw. zurDefinition einer 
Funktion) 164 

DEL ("delete", Taste zum 
rückwärtsschreitenden LÖ- 
schen auf dem Bildschirm)]7 

Dialog (mit dem VC 20) 73 

Dichtebild (Darstellung einer 
Funktion über der Fläche 
als Helligkeitsmuster) 123 

Differentiation (Bestimmung 
der Steigungsfunktion, hier 
mit Differenzen) 32 

DIM ("dimension", Speicher- 
Reservierung für indizierte 
Variable) 9, 164 

Diskette (kleine Magnetplatte 
zur externen Daten- und 
Programmspeicherung, hier 
für Feingrafik-Bilder) 115f. 

Division auf unendlich viele 
Stellen genau (Scherzpro- 
gramm, aber korrekt) 152 

Dollar ($, kennzeichnet 
Strings = Texte) 2] 

Doppelpunkt (:, trennt Anwei- 
sungen der gleichen Pro- 
grammzeile voneinander) 2] 

Doppelbelegung (Trick für 
großes Feingrafikbild) 105 

DRAW (Anweisung zum Linien- 
ziehen) 166 

Drehung (Koordinatenumrech- 
nung mit Matrix) 113 

Drehwiderstand (Paddle) 30 

Drucker (speziel] VC 1525, 
andere Typen mit evtl. 
Abänderungen, hier Nutzung 
für Feingrafik) 120 

Dummy-Argument (muß angegeben 
werden, obwohl die zugehö- 
rige Funktion nur vom Zu- 
stand des Computers ab- 
hängt) 34 


Echtzeitschleife (ermittelt 
ihre eigene Rechenzeit und 
verwendet das Ergebnis bei 
Berechnungen) 38 

Editierung (Eingabe und Än- 
derung von Programmzeilen, 
beim VC 20 mit einigen 
Tricks sehr bequem) 24 
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Eingabeverfahren 14 

ELIZA (berühmtes Programm von 
J. Weizenbaum, simuliert 
Dialog mit Patienten) 164 

END (Anweisung im Programm 
zum Beenden des Laufs) 164 

Ende des Programmlaufs 6] 

Endlosschleife 3 

ENTER (Abschluß einer Eingabe, 
beim VC 20 in der RETURN- 
Taste "enthalten") 19 


EXECUTE (Refehl zur Ausfüh- 
rung einer Anweisung, beim 
YC 20 in der RETURN-Taste 
"enthalten") 19 

EXP() (Exponentialfunktion 
zur Basis e) 163 


fallender Besen, vgl. Besen 

Farben 16 (bei Feingrafik:) 
105 (Farbsnpeicher:) 84 ff. 

Fangschleife 6] 

Feingrafik (mit 64 Punkten 
anstelle eines Buchstaben) 
100 (mit 136 x 224 Punkten‘) 
105 

Feuerknopf (Druckknopf am 
"Paddle") 30 

Fibonacci, Leonardo 
159 

Floppy (eigentlich die "bieg- 
same" Diskette, meist aber 
das Gerät dazu) vgI Diskette 

FN (Namensanfang für Funktio- 
nen, die mit DEF erzeugt 
werden) 164 

FOR (Beginn einer Schleife) 
66, 164 

Formatieren von Zahlen 72 

Fourier-Synthese (Erzeugung 
fast willkürlicher Funktio- 
nen als Summen von SIN und 
05) 122 

FRE(®) zeigt den für BASIC 
noch freien Speicher in 
Bytes an ("free") 

fremde Alphabete erzeugen 93 

Frequenzen für Musik berech- 
nen lassen 134 

Funktion (Zuordnung je einer 
eindeutigen Zahl zu einer 
Zahl oder einem Satz von 
Zahlen, statt Zahlen können 
auch Texte auftreten; Ein- 
gabemöglichkeit:) 31 (Druk- 
ken in Feingrafik:) 12] 


(um 1200), 


(vier Sonder- 
22 


Funktionstasten 
tasten am VC 20) 


Game over (bei zeitlicher 
Begrenzung der Spieldauer) 
39 

Gänsefüßchen (", schalten bei 
der Editierung zwischen in- 
direktem und direktem Modus 
hin und her) 17,21,75 

Gedächtnisspiele 150 

Geheimschrift (Vertauschung 
von Buchstaben nach Code) 
143 

Geschicklichkeitsspiele ]5] 

Geschwindigkeit 153 

GET (Abfrageanweisung für den 
Tastaturpuffer) 27, 154 

GET= (Eingabeanweisung für 
externe Speicher) 164 

Gleichheit (bei Text:) 53 
(Vorsicht beim Abfragen 
der Gleichheit bei Zahlen:) 
64 

Gleichheitszeichen 
zuweisung und bei 


(bei Wert- 
Vergleich) 


50 
Gleitende Ziffern (Grafik- 
Trick) 96 


Glückspiele 149 

Goldener Schnitt 
159 

GOSUB (Sprung in ein Unter- 
programm) 62, 164 

GOTO (auch GO TO, unbedingter 
Sprung) 61, 164 

Grafik 74 ff. 

Grafikzeichen (geordnet) 168f. 

GRAPHIC (Umschaltung in den 
Grafikmodus) 166 

griechische Buchstaben 93 

Großbuchstaben (Zeichensatz) 
16 

Groteske Schrift 
Buchstaben) 98 


(a/b=b/(atb)) 


(vergrößerte 


Halbtöne (Intervalle in der 
Musik} 135 

Hardcopv (Ausdrucken eines 
3ildschirminhaltes, hier 
speziell Feingrafik:) 127 

Hi-Score (Punktzahl-Rekord, 
hier : nicht löschen bei 
neuem RUN: ) 12 

Histogramm (grafische Dar- 
stellung in Säulenform) 80 


Hochkomma (ungenaue Bezeich- 
nung für Anführungszeichen 
"vgl. Gänsefüßchen) 

Hochzahlen (auf dem Bild- 
schirm schreiben) 98 

HOME (Startposition des Cur- 
sors links oben auf dem 
Bildschirm, hier: zugehöri- 
ge Speicherplätze) 78 

Hupen-Programm 29 

hyperbolisches Parabolotd 
(sattelförmig gekrümmte 
Fläche) 130 


Ich pack' in meinen Koffer 
(Gedächtnisspiel) 150 

IF (mit THEN bedingte Anwei- 
sung, mit GOTO bedingter 
Sprung) 64, 164 

indiziert (mit einem Index 
gekennzeichnet, in RASIC 
nichtnegative ganze Zahlen 
zugelassen) 6 

INPUT (Eingabeanweisung mit 
Programmunterbrechung und 
Dialog) 25,164 

INPUT= (Eingabe bei externem 
Speicher) 165 

Insert-Taste (INST, schiebt 
freie Plätze in einen 
Pildschirmtext, die den 
"indirekten" Gänsefüßchen- 
modus bekommen) 18 

INST vgl. Insert-Taste 

INTÜ) ("integer" = ganzzah- 
lig, rundet auf die nächste 
nicht-größere ganze Zahl 
ab) 48, 163 

Integer-Variable (wörtlich: 
Ganzzahl-Variable, ist aber 
auf 15 Bit +Vorzeichen be- 
schränkt) 7 

Integral (Grenzwert für das 
Aufsummieren einer Funktion 
für beliebig feine Schritte, 
hier als Summe angenähert:) 
32 

Invertieren (Umkehren, hier: 
Vertauschen von "Papier"- 
und "Tinten"-farbe bei 
Buchstaben etc.)(bei Vier- 
telgrafik:) 83 (bei Fein- 
grafik:) 104 


Ja/Nein-Entscheidung (liefert 
ein Bit) 1] 


Joystick 


18] 


(Schalter für acht 
Richtungen und Ruhestel- 
lung) 33 


Kassette (bei Speicherung von 
Feingrafik) 115 

KEY (Beleguna der Funktions- 
tasten mit Texten) 20,23,166 

Kilobvte (KB, =1024 Bytes = 
81022 Bits) 

Kino (Programmbeisnrie]l mit 8 
Bildschirmbildern abwech- 
selnd) 87 

Klammeraffe (®@) 2] 

Klammern (legen Reihenfolce 
bei Berechnunaen fest) 49 

Kleinbuchstaben 16 

Klingelknopf 28 

Koffer-Spiel 150 

Komma (trennt insbesondere 
aleichartige Zahlen oder 
Texte bei Anweisunaen) 2] 

Koordinaten (Zahlen, die die 
Lage eines Punktes beschrei- 
hen) 112 (Umrechnungen, 
Transformationen:) 113 

Kunst (Computer-Grafik) 147 


laufende Welle 160 

Leertaste 18 

LEFT$() (übernimmt linkes 
Ende eines String) 53,163 

LEN() (ergibt Länge eines 
String) 52,164 

Leonardo von Pisa, vgl. 
Fibonacci 

LET (Wertzuweisung, kann 
ohne dieses Wort geschrie- 
ben werden) 50, 165 

Lichtgriffel (wird mit der 
Spitze auf eine Stelle des 
Bildschirms gesetzt und 
liefert die Koordinaten)40 

Linien (bei "hausgemachter" 
Feingrafik) 104 

LIST (Befehl zum Ausgeben 
des Programmtextes) 165 

LOAD (Befehl zum Eingeben 
eines Programms von einem 
externen Speicher) 165 

Logarithmen (zu beliebiger 
Basis) 48 

LOG() (Logarithmusfunktion 
zur Basis e) 163 

Logik (formalisiert) 55 

Löschen 17 (bei Viertel- 
grafik:) 83 (bei Fein- 


162 


grafik:) 104 | 
lustiger Zoo (Wortspiele) 68 
Lyrik (Computer-) 144 


Matrix (Zahlentabelle, ins- 
besondere bei Berechnungen, 
hier zur Umrechnung von 
Koordinaten) 114 

Memory (Gedächtnisspiel) 
150 

Mengenlehre-Bild (Beispiel 
für feine Hardcopy) 128 ff. 

MID$() (bewahrt Stück aus 
einem String), 53,163 

mittelfeine Grafik (Viertel- 
(buchstaben-)Grafik) 8] 

Monte-Carlo-Methode (Rechen- 
methode mit Verwendung des 
Zufallsgenerators) 43 

Morsezeichen 143 

Multicolor (Modus der Grafik 
mit 4x 8 "Punkten" statt 
eines Buchstaben und dabei 
4 einzeln wählbaren Farben, 


Fl 


hier: "hausgemacht":) 108 
(Anwendung:) 14] 
Musik (technische Hinweise:) 


133 (Anwendung:) 142 

negative Binärzahlen 59 

Neumann, John von (1903-1957, 
einer der größten Mathema- 
tiker unseres Jahrhunderts, 
hier: Methode zur Erzeugung 
einer fast willkürlichen 
Zufallsverteilung:) 45 

NEW (Befehl zum "Vergessen" 
eines BASIC-Programms) 165 

NEXT (Abschluß einer FOR- 
Schleife) 66,165 

NIM (einfaches Brettspie])) 
147, 148 

NOT (logische Verneinung) 
56, 165 


oder (logische Verknüpfung: 
wird in der Umgangssprache 
meist im Sinne von XOR be- 
nutzt, in der Logik im 
Sinne von OR) 55 

ON (Sprungverteiler für GOTO 
oder GOSUB, macht Sprung- 
ziel von einer Zahl abhän- 
gig) 63, 165 


OPEN (öffnet einen formalen 
Weg zu einem Ein-/Ausgabe- 
Gerät) 165 

OR (nicht-ausschließendes 
"oder": a OR b ist stets 
wahr, wenn mindestens eine 
der Aussagen a oder b wahr 
ist) (11), 55, 165 

Ordnen 54 


Paddles (Drehpotentiometer 
mit Analog-Digitalwandler- 
Anschluß) 30 

PAINT (Anweisung zum Ausfül- 
len einer umrandeten Flä- 
che) 167 

Paraboloid, hyperbolisches 
(sattelförmig gekrümmte 
Fläche) 130 

Parameter ("Nebengröße", von 
der eine Funktion "auch" 
abhängt, wichtig bei "ver- 
schlungenen" Kurven) 124 

PEEK() (liefert Inhalt,d.h. 
einByte, aus einem Speicher 
platz) 69, 163 

PEEK(203) = PEEK{197) (lie- 
fert eine Code-Nummer der 
zur gleichen Zeit gedrück- 
ten Taste) 22, 29 

PEEK(653) (liefert eine Code- 
zahl für die zugleich ge- 
drückten Umschalttasten) 
Ba 29 

PEEK(36872) und PEEK(36873) 
(liefern die Stellungen 
der beiden Paddles) 30 

PEEK(37137) und PEEK(37152) 
(liefern die Zustände des 
Joysticks bzw. der Feuer- 
knöpfe an den Paddles, aber 
nicht ganz ohne weiteres) 
34.,.35 

perspektivische Zeichnung 115 

Pfeile (Grafikzeichen) 170 

Pisano, vgl. Fibonacci 

POINT (Anweisung zum Setzen 
oder Löschen eines Punktes) 
112, 167 

POKE (Anweisung zum Schreiben 
von einem Byte in einen 
Speicherplatz) 69 , 165 

POKE-Grafik (verwendet die 
auf den Tasten vorhandenen 
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Grafikzeichen) 77 (geord- 
nete Listen:) 168 ff. 

POKE 56,X (setzt Begrenzung 
für BASIC fest) 95 

POKE 198,X 28 

POKE 649,X (begrenzt Tastatur- 
puffer) 28 

POKE 650,X (bestimmt über Dau- 
erfunktionstasten) 20 

POKE 36864,X und POKE 36865,X 
(justieren den Rand des 
Bildschirms) 110 

POKE 36866,X und POKE 36867,X 
(legen Zahl der Spalten und 
der Zeilen fest) 86, 98 

POÜKE 36869,X (legt die Spei- 
cherbereiche für die Si]ld- 
schirmbelegung (Video-RAM) 
und für die Zeichenfornmen 
(Character RAM) fest) 16, 
84, 89, 90, 95 

POKE 36874,X bis POKE 36877,X 
(legen Tonhöhen und Abschal- 
tung der Ton- und Rausch- 
register (Fernsehkanal) 
fez:t) 133 

POKE 36878,X (legt Lautstärke 
und Zusatzfarbe bei Multi- 
color fest) 108, 133 

POKE 36879,X (legt "Papier"- 
und "Tinten-"Farbe des 
Bildschirms fest) 107 

POKE 37144,X bis POKE 37147,X 
(bestimmen Ton für den User- 
Port) 13) 

POKE 37154,X (schaltet zwi- 
schen Tastatur und Joy- 
stickabfrage) 35 

Polarkoordinaten 63,113 

POS(}) (zeigt Spaltennunmer 
des Cursor an) 67, 162 

PRINT (Anweisung zum Schrei- 
ben auf dem Bildschirm) 

12». 13, 1.65 

PRINT-Grafik 75 

PRINT= (Schreibeanweisung 
für externes Gerät) 165 

Priorität (Reihenfolge bei 
der Ausführung von zusam- 
mengesetzten Rechungen) 49 

Punkt (Dezimalzeichen) 2] 

Quiz-Programme 53, 140 

RAM ("random access memory", 
Speicher, dessen Plätze ge- 


lesen und beschrieben wer- 
den können) 69 
RCOLR() (liest die mit COLOR 
vorgewähltenFarben aus)163 
RDOT(,) (liest Farbe eines 
Biidpunktes aus) 41, 163 
READ (weist einer Variablen 
den nächsten Wert aus dem 
DATA-Stapel zu) 35,165 
Reaktionszeit (Progr.) 40 
Real-Zahlen ("reelle" Zahlen, 
bei Computern svw. Gleit- 
punktzahlen) 5 


Redundanz (ungenutzter Anteil 
einer Informationsmenge, 
ist in Maßen erwünscht) 

REGION (schaltet "Tinten-" 
Farbe für folgende Anwei- 
sungen um) 167 

Reihenfolge der Ausführung 
von Rechenoperationen 4 

relative Steuerung (bei 
PRINT-Grafik) 76 

REM ("remark" = Anmerkung, 
Anweisung, den Rest der 
Programmzeile zu ignorie- 
ren) 165 


RESTORE (setzt den Zeiger 
des DATA-Stapels an den An- 
fang zurück) 37,165 

RESTORE-Taste (schaltet u.a. 
Grafik aus) 20 

RETURN (Sprunganweisung am 
Ende eines Unterprogramms 
zurück an die Stelle, von 
der mit GOSUB gesprungen 
wurde) 62, 165 

RETURN-Taste (schließt Ein- 
gaben, Editierungen und 
direkte Befehle ab und 
bringt dabei auch den Cur- 
sor an den Anfang der 
nächsten Zeile; mit SHIFT 
bewirkt sie nur das letzte- 
re) 18 

REVERSE (Vertauschung von 


146 


"Papier-" und "Tinten-" 
Farbe) 16, 89 

RGR(8) (fragt Grafik-Modus 
ab) 162 

Richtungsschalter (Joystick) 
33 

RIGHT$() (bewahrt rechtes 


Ende eines String) 53, 163 
RJOY(G) (fragt Joystick bzw. 
Feuerknöpfe der Paddles 


184 


ab) 30, 33, 162 

RND() (erzeugt Zufallszahlen 
zwischen ® und 1) 43,163 

ROM ("read only memory" = 
Speicher, in dem nur gele- 
sen werden kann) 69 

Roulette 149 

RPEN() (Abfrage des Licht- 
griffels) 163 

RPOT() (Abfrage der Paddles) 
30, 163 

RSND() (Abfrage der Musikre- 
gister) 163 

RUN (Befehl zum Start eines 
BASIC-Programms) 165 

RUN/STOP-Taste (bewirkt STOP 
und mit SHIFT zusammen 
LOAD mit anschließendem 
RUN) 19 


SAVE (Anweisung zum Abspei- 
chern eines Programms auf 
einem externen Träger) 166 

Schach 147 

Schleife (wiederholt zu 
durchlaufender Programm- 
teil) 66 

Schnittpunkte 42 

Schutz vor Löschen 

Schutz vor BASIC 95 

Seitenverhältnis (bei Hard- 
copy korrigieren) 131 f. 

SCNCLR (Löschen des Bildes)167 


Semikolon (Trennzeichen ;)2] 

Senso (Gedächtnisspiel) 150 

Setzen (eines Punktes) 83 

SGN() (Vorzeichenfunktion 
mit den Werten +1,98 oder 
-1) 163 

SHIFT (Umschalttaste für die 
Zweitbelegung der Tasten) 
15,89 (einrastbar: SHIFT- 
LOCK:) 29 

Silbentrennung (mit POS():) 
67 

Simulation (Nachahmung eines 
Vorgangs, hier durch ein 
Programm mit beweglicher 
Grafik) 151 ff. 

SIN() (Funktion Sinus) 163 

Sonderzeichen (selbstent- 
worfene) 93 

SOUND (Anweisung für die 
Musik über den Fernsehka- 
nal) 70, 136, 167 

Spalten (-anzahl) 97 


(bei RUN)12 


SPC() (programmierter Cursor- 
sprung nach rechts, 
"space") 166 

Speicherbedarf (für Variable) 
7 


Spiele 147 ff. 

Sprung 6] 

SQR() (Quadratwurzel, 
nichtnegative Lösung von 
x’=y ist x= SQR(y)) 163 

Start-Taste (mit KEY erzeu- 
gen) 20 

stehende Welle (Schwingungs- 
zustand mit ortsabhängiger 
Amplitude) 161 

Stereo (Bild:) 115 (Ton:)136 

Steigungsfunktion (32) 

STEP (Schrittweite in Schlei- 
fen) 66, 166 

STOP (programmiertes Ende des 
Programmlaufs) 166 

STR$() Umwandlung einer Zahl 
in ein String (Text) ) 51, 
163 

Strategiespiele 148 

String (Zeichenkette, Text) 6 

Stringverkettuna (mit +) 52 

Stufen (Grafikzeichen) 168 f. 

Subroutine (Unterprogramm) 62 

Summierung (einer Funktion) 32 

Super-Expander (Modul VC 1211A 
mit Grafik- und Musik-Anwei- 
sungen und 3 KB Speicher- 
erweiterung) 23, 11] 

SYS (Sprunganweisung in ein 
Unterprogramm, das in Ma- 
schinensprache geschrieben 
ist) 166 


d.h. 


TAB() (Cursor-Sprung in ge- 


wählte Spalte, "Tabulator") 
166 
TAN() (Funktion Tangens) 163 


Tapetenmuster (Grafik-Pro- 
gramm) 146 

Tastatur ]5 

Tastaturpuffer (speichert 
bis zu 10 Tastendrücke) 
27,40 

Tasten-Code (für PEEK(203) 
oder PEEK(197)) 29 

Tasten für Grafikzeichen 
(geordnet) 168 f. 

Textausgabe (Dialog) 73 

THEN (Verzweigungsstelle in 
IF-Anweisung: bei nicht- 


s 
<I 


erfüllter Bedingung oder 
Wert 0 springt das Pro- 
gramm hier zur nächsten 
Zeile) 64, 166 

Thermostat (Simualtions-Pro- 
gramm) 157 

TI und TI$ (Zeitvariablen) 
38 

Tiernamen (Scherzprogramme 
mit Textverarbeitung) 68, 
143 

TO (steht in FOR-Anweisungen 
zwischen Start- und Ziel- 
wert der Zählvariablen)]66 

Töne 133, 142 

Transversalwellen 125 f. 

Übertrag (beim Rechnen) 58 

Uhr 38 

Umklappbild (perspektivisch 
zweideutig, das Gehirn des 
Betrachters wechselt 
schlagartig zwischen den 
Deutungen) 76 

Umlaute (mit Sonderzeichen) 
93,94 

Umrandungsstücke (Grafik- 
zeichen, geordnet) 169 

Umschalttasten (für die 
Mehrfachbelegungen der 
Tasten) 15 

unbedingter Sprung (G0T0) 61 

UND (logische Verknüpfung, 
vgl. AND 

Unterprogramm (Programmteil, 
der von verschiedenen 
Stellen aus erreicht wer- 
den kann, wo es anschlie- 
Bend auch weitergehen soll, 
Aufruf mit GOSUB, Rück- 
sprung mit RETURN) 62 

unzulässige Variablennamen 
(speziell aus zwei Zeichen) 
5 


USRÜ) Berechnung einer 
Funktion in einem Unter- 
programm in Maschinenspra- 
che) 163 


VAL() (liefert eine Zahl aus 
dem Anfang eines String) 
51, 164 

Variable ("Veränderliche" 
Größe, die im Programm 
verschiedene Werte annehmen 
kann, es kommt bei BASIC 


den 
den 


wesentlich darauf an, 
Wert im Auge zu haben, 
sie bei ihrer Abfrage 
hat) 4 

VC 1211A (Super-Expander) 

Vc 1525 (Drucker, ähnlich 
Vc 1515 u.a.) 120 

vc 1541 (Diskettenstation, 
ähnlich VC 1540) 

Venn-Diagramm (Mengenlehre- 
Grafik als Beispiel für 
die Hardcopy) 128 

Vereine (Beispiel für kom- 
primierte Daten) ]] 

Vergleich (von Strings) 53 

VERIFY (Befehl zum Vergleich 
des Programms im Computer 
mit einem extern gespei- 
cherten, vor allem als 
Kontrolle nach SAVE) 166 

Verkettung (von Strings) 52 

Verneinung (logische Opera- 
tion NOT) 56 

Video-RAM (Speicherbereich 
mit Informationen über 
die Zeichen auf dem Bild- 
schirm, genauer: ihre Num- 
mern im Bildschirmcode) 86, 
96 

Viertelgrafik (mittelfeine 
Grafik mit vier "Punkten" 
anstelle jeden Buchstabens) 
81, 170 


11] 


Wahlergebnisse (Beispiel für 
indizierte Variable) ]10 
WAIT (bedingte Pause) 166 
Wahrheitstafeln (für NOT, OR 
und AND) 55 
Warten auf GET 27 
Weizenbaum, Joseph (*1923, 
schrieb ELIZA) 144 
Welle 160 (Reflexion:) 
Wertzuweisung 50 
Wortspiele 143 
Wurm-Spiel 15] 


125 


XOR (ausschließendes ODER, 
a X0OR b ist nur wahr, wenn 
genau eine der Aussagen a 
und b wahr ist; im normalen 
BASIC nicht enthalten) 56 


Zahlenausgabe 72 
Zählwerk (Analogie zum Zif- 


fernsystem) 58 (Trickpro- 
gramm mit gleitenden Zif- 
fern) 9 
Zeichensätze 16, 89, 9] 
Zeilenzahl (auf dem Bild- 
schirm) 97 
Zeilennummern 
gramm) 3, 24 


Zeit (Messung:) 38 (Darstel- 


lung: ) 139 

Zentrieren des Bildschirms 
105 

Zufall 43 (Bild:) 46 
lungen:) 45 


Zweier-Komplement (Bezeich- 


nung für die im VC 20 ver- 
wendete Darstellung negati- 
(59) 


ver Binärzahlen) 


(im BASIC-Pro- 


(Vertei- 


co 
a 


Zwei-Personen-Spiel 


+ 


+ 
TC 


% 
$ 


ohne 


gegenseitige Störung der 
Tasten) 29 


- * /A = <> (mathemati- 
sche Zeichen) 164 

(bei Strings) 52 

<> (bei Strings) 53 
(Verhältnis aus Umfang und 
Durchmesser eines Kreises) 
166 

(Kennzeichnung für Integer- 
Variable) 7 

(Kennzeichnung für Strings) 
2] 


A(Beispiel für ein selbst- 


gemachtes Sonderzeichen) 93 





Diese Software bringt Sie weiter. 


Programme des Autors Dr. Norbert Treitz (s. Seite 174) 
Bestell-Nummern* 


BESCHLEUNIGUNG c=050311 D-051311 
SCHWINGUNGEN I e=-0503412 D-051312 
SCHWINGUNGEN II C=-050313 D-051313 
ZUFALL (Galton-Brett u.a.) c-050212 D-051212 
TÜRME VON HANOI c-050213 D-051213 


ELEMENTE 
LACKMUS 


THERMOSTAT 
GESICHTER 


MUSIK 


c-050511 
c-050513 
c-050318 
ce-050771 
c-050911 


D-051511 
D-051513 
D-051318 
D-051711 
D-051911 


Weitere Programme zur Aus- und Weiterbildung in Schule 
Beruf und Freizeit 

zur PHYSIK, CHEMIE, MATHEMATIK, TECHNIK, INFORMATIK, 
BIOLOGIE, VERKEHRSERZIEHUNG, zu SPRACHEN und anderen 
Themenbereichen, 


zum Beispiel: 


GESCHWINDIGKEIT c-050301 D-051301 
SATELLITENBAHN c-050325 D-051325 
ENTFERNUNG DER PLANETEN C-050306 D-051306 
VOLUMENAUSDEHNUNG VON GASEN c-050303 D-051303 
LICHTBRECHUNG c-050305 D-051305 
DICHTE c-050321 D-051321 
HYDRAULISCHER WAGENHEBER C-050323 D-051323 
OTTOMOTOR c-050315 D-051315 
MOLEKÜLMASSEN C-050512 D-051512 
FUNKTIONEN C-050201 D-051201 
KURVENDISKUSSION c-050203 D-051203 
SCHNITTMENGEN C-050211 D-051211 
RAUCHEN UND GESUNDHEIT c-050801 D-051801 
ANHALTE-/ÜBERHOLWEG/AUFPRALL c-050751 D-051751 
VOKABEL-TRAINER (Sprache angeben!) 

TESTAUSWERTUNG c-050951 D-051951 


» Alle Programme mit Begleittexten; 
lieferbar auf Cassette (C) oder Diskette (D) 
für VC 20 oder C 64. Bitte Prospekt anfordern! 


HADU-Hagemann Lehrmittel- und Verlagsgesellschaft mkH, 
Postfach 5129, 4000 Düsseldorf 1 





Was finden Sie in diesem Buch? 


- knappe Beschreibungen, kurze Beispiele und Tricks zu 
den wirklich wichtigen BASIC-Anweisungen - auch zu denen 
des Super-Expanders 


"MIT DEM Vc 20° 


- Eingaben mit INPUT, GET, PEEK, Paddles und Joystick 





- Editiertricks für Faulenzer 

- was man mit dem Zufallsgenerator machen kann 

- viele Sorten Feingrafik, mit und ohne Super-Expander 
- Multicolor und andere bunte Bilder 


- wie man fertige Feingrafik abspeichern oder ausdrucken 
kann | 


- wie man 256 eigene Zeichen definieren kann 
- Musik über den Fernsehkanal und über den User-Port 


- Anregungen, Tips und kurze Beispiele zu Simulationen 
und Spielprogrammen 


- maßstabsgerechte Entwurfsraster für Grafik mit POKE 
und mit REGION 


- Kurzeingaben und Codenummern für alle BASIC-Wörter des 
VC 20 und des Super-Expanders 


- systematische Tabelle der fertigen Grafikzeichen für 
POKE, CHR$ und PRINT 


- ausführliches Register, zugleich als Kurz-Lexikon 


Wenn Sie einen VC 20 haben oder kaufen wollen, ist 

dieses Buch eine anregende, leichtverständliche und 
preiswerte Ergänzung zum VC 20-Handbuch. Es enthält keine 
langen Programme zum Eintippen (nur kurze Beispiele zum 
Kennenlernen der Tricks), denn so richtig Spaß macht der 
Computer erst, wenn man eigene Programme macht. Genau 
dazu kann dieses Buch Ihnen nützlich sein. 
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